home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1995-08-29 | 37.3 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 1%
| dexvert
| Emacs Compiled Lisp (other/emacsCompiledLisp)
| magic
| Unsupported |
| 1%
| dexvert
| Combustion 2 Particle Library (other/combustion2ParticleLibrary)
| ext
| Unsupported |
| 100%
| file
| Emacs/XEmacs v19 byte-compiled Lisp data
| default
| |
| 99%
| file
| data
| default
| |
| 100%
| TrID
| Emacs/XEmacs byte-compiled Lisp (generic)
| default
| |
| 100%
| xdgMime
| text/x-emacs-lisp
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 63 74 68 6f 6d 70 40 |piled by| cthomp@|
|00000020| 77 69 6c 6c 6f 77 2e 63 | 73 2e 75 69 75 63 2e 65 |willow.c|s.uiuc.e|
|00000030| 64 75 20 6f 6e 20 54 75 | 65 20 41 75 67 20 32 39 |du on Tu|e Aug 29|
|00000040| 20 31 33 3a 35 35 3a 35 | 36 20 31 39 39 35 0a 3b | 13:55:5|6 1995.;|
|00000050| 3b 3b 20 66 72 6f 6d 20 | 66 69 6c 65 20 2f 78 65 |;; from |file /xe|
|00000060| 6d 61 63 73 2f 78 65 6d | 61 63 73 2d 31 39 2e 31 |macs/xem|acs-19.1|
|00000070| 33 2d 72 65 6c 65 61 73 | 65 2f 65 64 69 74 6f 72 |3-releas|e/editor|
|00000080| 2f 6c 69 73 70 2f 64 69 | 72 65 64 2f 64 69 72 65 |/lisp/di|red/dire|
|00000090| 64 2d 78 2e 65 6c 0a 3b | 3b 3b 20 65 6d 61 63 73 |d-x.el.;|;; emacs|
|000000a0| 20 76 65 72 73 69 6f 6e | 20 31 39 2e 31 33 20 58 | version| 19.13 X|
|000000b0| 45 6d 61 63 73 20 4c 75 | 63 69 64 2e 0a 3b 3b 3b |Emacs Lu|cid..;;;|
|000000c0| 20 62 79 74 65 63 6f 6d | 70 20 76 65 72 73 69 6f | bytecom|p versio|
|000000d0| 6e 20 32 2e 32 35 3b 20 | 31 2d 53 65 70 2d 39 34 |n 2.25; |1-Sep-94|
|000000e0| 2e 0a 3b 3b 3b 20 6f 70 | 74 69 6d 69 7a 61 74 69 |..;;; op|timizati|
|000000f0| 6f 6e 20 69 73 20 6f 6e | 2e 0a 3b 3b 3b 20 74 68 |on is on|..;;; th|
|00000100| 69 73 20 66 69 6c 65 20 | 75 73 65 73 20 6f 70 63 |is file |uses opc|
|00000110| 6f 64 65 73 20 77 68 69 | 63 68 20 64 6f 20 6e 6f |odes whi|ch do no|
|00000120| 74 20 65 78 69 73 74 20 | 69 6e 20 45 6d 61 63 73 |t exist |in Emacs|
|00000130| 20 31 38 2e 0a 0a 28 69 | 66 20 28 61 6e 64 20 28 | 18...(i|f (and (|
|00000140| 62 6f 75 6e 64 70 20 27 | 65 6d 61 63 73 2d 76 65 |boundp '|emacs-ve|
|00000150| 72 73 69 6f 6e 29 0a 09 | 20 28 6f 72 20 28 61 6e |rsion)..| (or (an|
|00000160| 64 20 28 62 6f 75 6e 64 | 70 20 27 65 70 6f 63 68 |d (bound|p 'epoch|
|00000170| 3a 3a 76 65 72 73 69 6f | 6e 29 20 65 70 6f 63 68 |::versio|n) epoch|
|00000180| 3a 3a 76 65 72 73 69 6f | 6e 29 0a 09 20 20 20 20 |::versio|n).. |
|00000190| 20 28 73 74 72 69 6e 67 | 2d 6c 65 73 73 70 20 65 | (string|-lessp e|
|000001a0| 6d 61 63 73 2d 76 65 72 | 73 69 6f 6e 20 22 31 39 |macs-ver|sion "19|
|000001b0| 22 29 29 29 0a 20 20 20 | 20 28 65 72 72 6f 72 20 |"))). | (error |
|000001c0| 22 54 68 69 73 20 66 69 | 6c 65 20 77 61 73 20 63 |"This fi|le was c|
|000001d0| 6f 6d 70 69 6c 65 64 20 | 66 6f 72 20 45 6d 61 63 |ompiled |for Emac|
|000001e0| 73 20 31 39 2e 22 29 29 | 0a 0a 28 64 65 66 63 6f |s 19."))|..(defco|
|000001f0| 6e 73 74 20 64 69 72 65 | 64 2d 65 78 74 72 61 2d |nst dire|d-extra-|
|00000200| 76 65 72 73 69 6f 6e 20 | 28 73 75 62 73 74 72 69 |version |(substri|
|00000210| 6e 67 20 22 21 52 65 76 | 69 73 69 6f 6e 3a 20 31 |ng "!Rev|ision: 1|
|00000220| 2e 31 39 31 20 21 22 20 | 31 31 20 2d 32 29 20 22 |.191 !" |11 -2) "|
|00000230| 5c 0a 49 64 3a 20 64 69 | 72 65 64 2d 78 2e 65 6c |\.Id: di|red-x.el|
|00000240| 2c 76 20 31 2e 31 39 31 | 20 31 39 39 32 2f 30 35 |,v 1.191| 1992/05|
|00000250| 2f 31 34 20 31 31 3a 34 | 31 3a 35 34 20 73 6b 20 |/14 11:4|1:54 sk |
|00000260| 52 65 6c 42 65 74 61 20 | 22 29 0a 28 62 79 74 65 |RelBeta |").(byte|
|00000270| 2d 63 6f 64 65 20 22 c0 | c1 21 88 c2 c3 21 88 c2 |-code ".|.!...!..|
|00000280| c4 21 87 22 20 5b 72 65 | 71 75 69 72 65 20 64 69 |.!." [re|quire di|
|00000290| 72 65 64 20 70 72 6f 76 | 69 64 65 20 64 69 72 65 |red prov|ide dire|
|000002a0| 64 2d 65 78 74 72 61 20 | 64 69 72 65 64 2d 78 5d |d-extra |dired-x]|
|000002b0| 20 32 29 0a 28 64 65 66 | 76 61 72 20 64 69 72 65 | 2).(def|var dire|
|000002c0| 64 2d 6d 61 72 6b 2d 6b | 65 79 73 20 27 28 22 5a |d-mark-k|eys '("Z|
|000002d0| 22 29 20 22 5c 0a 2a 4c | 69 73 74 20 6f 66 20 6b |") "\.*L|ist of k|
|000002e0| 65 79 73 20 28 73 74 72 | 69 6e 67 73 29 20 74 68 |eys (str|ings) th|
|000002f0| 61 74 20 69 6e 73 65 72 | 74 20 74 68 65 6d 73 65 |at inser|t themse|
|00000300| 6c 76 65 73 20 61 73 20 | 66 69 6c 65 20 6d 61 72 |lves as |file mar|
|00000310| 6b 65 72 73 2e 22 29 0a | 28 64 65 66 76 61 72 20 |kers.").|(defvar |
|00000320| 64 69 72 65 64 2d 64 61 | 6e 67 65 72 6f 75 73 2d |dired-da|ngerous-|
|00000330| 73 68 65 6c 6c 2d 63 6f | 6d 6d 61 6e 64 20 22 5e |shell-co|mmand "^|
|00000340| 72 6d 22 20 22 5c 0a 2a | 52 65 67 65 78 70 20 66 |rm" "\.*|Regexp f|
|00000350| 6f 72 20 64 61 6e 67 65 | 72 6f 75 73 20 73 68 65 |or dange|rous she|
|00000360| 6c 6c 20 63 6f 6d 6d 61 | 6e 64 73 20 74 68 61 74 |ll comma|nds that|
|00000370| 20 73 68 6f 75 6c 64 20 | 6e 65 76 65 72 20 62 65 | should |never be|
|00000380| 20 74 68 65 20 64 65 66 | 61 75 6c 74 2e 22 29 0a | the def|ault.").|
|00000390| 28 62 79 74 65 2d 63 6f | 64 65 20 22 c0 09 c2 c3 |(byte-co|de "....|
|000003a0| 23 88 c0 09 c4 c5 23 88 | c0 09 c6 c7 23 88 c0 09 |#.....#.|....#...|
|000003b0| c8 c9 23 88 c0 09 ca cb | 23 88 c0 09 cc cd 23 88 |..#.....|#.....#.|
|000003c0| c0 09 ce cf 23 88 c0 09 | d0 d1 23 88 c0 09 d2 d3 |....#...|..#.....|
|000003d0| 23 88 c0 09 d4 d5 23 88 | c0 09 d6 d7 23 88 c0 09 |#.....#.|....#...|
|000003e0| d8 d9 23 88 c0 09 da db | 23 88 c0 09 dc dd 23 88 |..#.....|#.....#.|
|000003f0| c0 09 de df 23 88 c0 09 | e0 e1 23 88 c0 09 e2 e3 |....#...|..#.....|
|00000400| 23 88 c0 09 e4 e5 23 88 | c0 09 e6 e7 23 88 e8 e9 |#.....#.|....#...|
|00000410| 0e 2a 5c 22 87 22 20 5b | 64 65 66 69 6e 65 2d 6b |.*\"." [|define-k|
|00000420| 65 79 20 64 69 72 65 64 | 2d 6d 6f 64 65 2d 6d 61 |ey dired|-mode-ma|
|00000430| 70 20 22 56 22 20 64 69 | 72 65 64 2d 76 6d 20 22 |p "V" di|red-vm "|
|00000440| 28 22 20 64 69 72 65 64 | 2d 73 65 74 2d 6d 61 72 |(" dired|-set-mar|
|00000450| 6b 65 72 2d 63 68 61 72 | 20 22 29 22 20 64 69 72 |ker-char| ")" dir|
|00000460| 65 64 2d 72 65 73 74 6f | 72 65 2d 6d 61 72 6b 65 |ed-resto|re-marke|
|00000470| 72 2d 63 68 61 72 20 22 | 49 22 20 64 69 72 65 64 |r-char "|I" dired|
|00000480| 2d 64 6f 2d 69 6e 73 65 | 72 74 2d 73 75 62 64 69 |-do-inse|rt-subdi|
|00000490| 72 20 22 cd 22 20 64 69 | 72 65 64 2d 64 6f 2d 75 |r "." di|red-do-u|
|000004a0| 6e 6d 61 72 6b 20 22 ef | 22 20 64 69 72 65 64 2d |nmark ".|" dired-|
|000004b0| 6f 6d 69 74 2d 74 6f 67 | 67 6c 65 20 22 a8 22 20 |omit-tog|gle "." |
|000004c0| 64 69 72 65 64 2d 6d 61 | 72 6b 2d 73 65 78 70 20 |dired-ma|rk-sexp |
|000004d0| 22 2c 22 20 64 69 72 65 | 64 2d 6d 61 72 6b 2d 72 |"," dire|d-mark-r|
|000004e0| 63 73 2d 66 69 6c 65 73 | 20 22 a1 22 20 64 69 72 |cs-files| "." dir|
|000004f0| 65 64 2d 73 6d 61 72 74 | 2d 73 68 65 6c 6c 2d 63 |ed-smart|-shell-c|
|00000500| 6f 6d 6d 61 6e 64 20 22 | a6 22 20 64 69 72 65 64 |ommand "|." dired|
|00000510| 2d 73 6d 61 72 74 2d 62 | 61 63 6b 67 72 6f 75 6e |-smart-b|ackgroun|
|00000520| 64 2d 73 68 65 6c 6c 2d | 63 6f 6d 6d 61 6e 64 20 |d-shell-|command |
|00000530| 22 54 22 20 64 69 72 65 | 64 2d 64 6f 2d 74 6f 67 |"T" dire|d-do-tog|
|00000540| 67 6c 65 20 22 77 22 20 | 64 69 72 65 64 2d 63 6f |gle "w" |dired-co|
|00000550| 70 79 2d 66 69 6c 65 6e | 61 6d 65 2d 61 73 2d 6b |py-filen|ame-as-k|
|00000560| 69 6c 6c 20 22 e7 22 20 | 64 69 72 65 64 2d 67 6f |ill "." |dired-go|
|00000570| 74 6f 2d 66 69 6c 65 20 | 22 c7 22 20 64 69 72 65 |to-file |"." dire|
|00000580| 64 2d 67 6f 74 6f 2d 73 | 75 62 64 69 72 20 22 26 |d-goto-s|ubdir "&|
|00000590| 22 20 64 69 72 65 64 2d | 64 6f 2d 62 61 63 6b 67 |" dired-|do-backg|
|000005a0| 72 6f 75 6e 64 2d 73 68 | 65 6c 6c 2d 63 6f 6d 6d |round-sh|ell-comm|
|000005b0| 61 6e 64 20 22 41 22 20 | 64 69 72 65 64 2d 64 6f |and "A" |dired-do|
|000005c0| 2d 62 79 74 65 2d 63 6f | 6d 70 69 6c 65 2d 61 6e |-byte-co|mpile-an|
|000005d0| 64 2d 6c 6f 61 64 20 22 | 46 22 20 64 69 72 65 64 |d-load "|F" dired|
|000005e0| 2d 64 6f 2d 66 69 6e 64 | 2d 66 69 6c 65 20 22 53 |-do-find|-file "S|
|000005f0| 22 20 64 69 72 65 64 2d | 64 6f 2d 72 65 6c 73 79 |" dired-|do-relsy|
|00000600| 6d 6c 69 6e 6b 20 22 25 | 53 22 20 64 69 72 65 64 |mlink "%|S" dired|
|00000610| 2d 64 6f 2d 72 65 6c 73 | 79 6d 6c 69 6e 6b 2d 72 |-do-rels|ymlink-r|
|00000620| 65 67 65 78 70 20 6d 61 | 70 63 61 72 20 23 5b 28 |egexp ma|pcar #[(|
|00000630| 78 29 20 22 c0 09 5c 6e | c3 23 87 22 20 5b 64 65 |x) "..\n|.#." [de|
|00000640| 66 69 6e 65 2d 6b 65 79 | 20 64 69 72 65 64 2d 6d |fine-key| dired-m|
|00000650| 6f 64 65 2d 6d 61 70 20 | 78 20 64 69 72 65 64 2d |ode-map |x dired-|
|00000660| 6d 61 72 6b 2d 77 69 74 | 68 2d 74 68 69 73 2d 63 |mark-wit|h-this-c|
|00000670| 68 61 72 5d 20 34 5d 20 | 64 69 72 65 64 2d 6d 61 |har] 4] |dired-ma|
|00000680| 72 6b 2d 6b 65 79 73 5d | 20 34 29 0a 28 66 73 65 |rk-keys]| 4).(fse|
|00000690| 74 20 27 64 69 72 65 64 | 2d 61 64 64 2d 68 6f 6f |t 'dired|-add-hoo|
|000006a0| 6b 20 23 5b 28 68 6f 6f | 6b 2d 76 61 72 20 66 75 |k #[(hoo|k-var fu|
|000006b0| 6e 63 74 69 6f 6e 29 20 | 22 c0 09 21 ac 84 09 c2 |nction) |"..!....|
|000006c0| 4c 88 09 4a 3c ab 87 09 | 4a 40 c3 3d ab 86 09 89 |L..J<...|J@.=....|
|000006d0| 4a 43 4c 88 0c 09 4a 3e | 3f ad 86 09 0c 09 4a 42 |JCL...J>|?.....JB|
|000006e0| 4c 87 22 20 5b 62 6f 75 | 6e 64 70 20 68 6f 6f 6b |L." [bou|ndp hook|
|000006f0| 2d 76 61 72 20 6e 69 6c | 20 6c 61 6d 62 64 61 20 |-var nil| lambda |
|00000700| 66 75 6e 63 74 69 6f 6e | 5d 20 33 20 22 5c 0a 41 |function|] 3 "\.A|
|00000710| 64 64 20 61 20 66 75 6e | 63 74 69 6f 6e 20 74 6f |dd a fun|ction to|
|00000720| 20 61 20 68 6f 6f 6b 2e | 0a 46 69 72 73 74 20 61 | a hook.|.First a|
|00000730| 72 67 75 6d 65 6e 74 20 | 48 4f 4f 4b 2d 56 41 52 |rgument |HOOK-VAR|
|00000740| 20 28 61 20 73 79 6d 62 | 6f 6c 29 20 69 73 20 74 | (a symb|ol) is t|
|00000750| 68 65 20 6e 61 6d 65 20 | 6f 66 20 61 20 68 6f 6f |he name |of a hoo|
|00000760| 6b 2c 20 73 65 63 6f 6e | 64 0a 61 72 67 75 6d 65 |k, secon|d.argume|
|00000770| 6e 74 20 46 55 4e 43 54 | 49 4f 4e 20 69 73 20 74 |nt FUNCT|ION is t|
|00000780| 68 65 20 66 75 6e 63 74 | 69 6f 6e 20 74 6f 20 61 |he funct|ion to a|
|00000790| 64 64 2e 0a 52 65 74 75 | 72 6e 73 20 6e 69 6c 20 |dd..Retu|rns nil |
|000007a0| 69 66 20 46 55 4e 43 54 | 49 4f 4e 20 77 61 73 20 |if FUNCT|ION was |
|000007b0| 61 6c 72 65 61 64 79 20 | 70 72 65 73 65 6e 74 20 |already |present |
|000007c0| 69 6e 20 48 4f 4f 4b 2d | 56 41 52 2c 20 65 6c 73 |in HOOK-|VAR, els|
|000007d0| 65 20 6e 65 77 0a 76 61 | 6c 75 65 20 6f 66 20 48 |e new.va|lue of H|
|000007e0| 4f 4f 4b 2d 56 41 52 2e | 22 20 22 53 41 64 64 20 |OOK-VAR.|" "SAdd |
|000007f0| 74 6f 20 68 6f 6f 6b 2d | 76 61 72 20 28 73 79 6d |to hook-|var (sym|
|00000800| 62 6f 6c 29 3a 20 5c 6e | 61 41 64 64 20 77 68 69 |bol): \n|aAdd whi|
|00000810| 63 68 20 66 75 6e 63 74 | 69 6f 6e 20 74 6f 20 25 |ch funct|ion to %|
|00000820| 73 3f 20 22 5d 29 0a 28 | 62 79 74 65 2d 63 6f 64 |s? "]).(|byte-cod|
|00000830| 65 20 22 c0 c1 c2 5c 22 | 88 c0 c3 c4 5c 22 87 22 |e "...\"|....\"."|
|00000840| 20 5b 64 69 72 65 64 2d | 61 64 64 2d 68 6f 6f 6b | [dired-|add-hook|
|00000850| 20 64 69 72 65 64 2d 6d | 6f 64 65 2d 68 6f 6f 6b | dired-m|ode-hook|
|00000860| 20 64 69 72 65 64 2d 65 | 78 74 72 61 2d 73 74 61 | dired-e|xtra-sta|
|00000870| 72 74 75 70 20 64 69 72 | 65 64 2d 61 66 74 65 72 |rtup dir|ed-after|
|00000880| 2d 72 65 61 64 69 6e 2d | 68 6f 6f 6b 20 64 69 72 |-readin-|hook dir|
|00000890| 65 64 2d 6f 6d 69 74 2d | 65 78 70 75 6e 67 65 5d |ed-omit-|expunge]|
|000008a0| 20 33 29 0a 28 64 65 66 | 76 61 72 20 64 69 72 65 | 3).(def|var dire|
|000008b0| 64 2d 64 65 66 61 75 6c | 74 2d 6d 61 72 6b 65 72 |d-defaul|t-marker|
|000008c0| 20 64 69 72 65 64 2d 6d | 61 72 6b 65 72 2d 63 68 | dired-m|arker-ch|
|000008d0| 61 72 20 22 5c 0a 2a 54 | 68 65 20 76 61 6c 75 65 |ar "\.*T|he value|
|000008e0| 20 6f 66 20 60 64 69 72 | 65 64 2d 6d 61 72 6b 65 | of `dir|ed-marke|
|000008f0| 72 2d 63 68 61 72 27 20 | 69 6e 20 65 66 66 65 63 |r-char' |in effec|
|00000900| 74 20 62 65 66 6f 72 65 | 20 64 69 72 65 64 2d 78 |t before| dired-x|
|00000910| 20 77 61 73 0a 6c 6f 61 | 64 65 64 20 61 6e 64 20 | was.loa|ded and |
|00000920| 74 68 65 20 76 61 6c 75 | 65 20 77 68 69 63 68 20 |the valu|e which |
|00000930| 69 73 20 72 65 73 74 6f | 72 65 64 20 69 66 20 74 |is resto|red if t|
|00000940| 68 65 20 6d 61 72 6b 65 | 72 20 73 74 61 63 6b 20 |he marke|r stack |
|00000950| 75 6e 64 65 72 66 6c 6f | 77 73 2e 0a 54 68 69 73 |underflo|ws..This|
|00000960| 20 69 73 20 75 73 75 61 | 6c 6c 79 20 74 68 65 20 | is usua|lly the |
|00000970| 61 73 74 65 72 69 73 6b | 20 60 2a 27 2e 22 29 0a |asterisk| `*'.").|
|00000980| 28 66 73 65 74 20 27 64 | 69 72 65 64 2d 65 78 74 |(fset 'd|ired-ext|
|00000990| 72 61 2d 73 74 61 72 74 | 75 70 20 23 5b 6e 69 6c |ra-start|up #[nil|
|000009a0| 20 22 c0 20 88 c1 20 88 | c2 20 87 22 20 5b 64 69 | ". .. .|. ." [di|
|000009b0| 72 65 64 2d 68 61 63 6b | 2d 6c 6f 63 61 6c 2d 76 |red-hack|-local-v|
|000009c0| 61 72 69 61 62 6c 65 73 | 20 64 69 72 65 64 2d 6f |ariables| dired-o|
|000009d0| 6d 69 74 2d 73 74 61 72 | 74 75 70 20 64 69 72 65 |mit-star|tup dire|
|000009e0| 64 2d 6d 61 72 6b 65 72 | 2d 73 74 61 63 6b 2d 73 |d-marker|-stack-s|
|000009f0| 74 61 72 74 75 70 5d 20 | 31 20 22 5c 0a 41 75 74 |tartup] |1 "\.Aut|
|00000a00| 6f 6d 61 74 69 63 61 6c | 6c 79 20 70 75 74 20 6f |omatical|ly put o|
|00000a10| 6e 20 64 69 72 65 64 2d | 6d 6f 64 65 2d 68 6f 6f |n dired-|mode-hoo|
|00000a20| 6b 20 74 6f 20 67 65 74 | 20 65 78 74 72 61 20 64 |k to get| extra d|
|00000a30| 69 72 65 64 20 66 65 61 | 74 75 72 65 73 3a 0a 5c |ired fea|tures:.\|
|00000a40| 5c 3c 64 69 72 65 64 2d | 6d 6f 64 65 2d 6d 61 70 |\<dired-|mode-map|
|00000a50| 3e 0a 20 20 5c 5c 5b 64 | 69 72 65 64 2d 76 6d 5d |>. \\[d|ired-vm]|
|00000a60| 09 2d 2d 20 56 4d 20 6f | 6e 20 66 6f 6c 64 65 72 |.-- VM o|n folder|
|00000a70| 0a 20 20 5c 5c 5b 64 69 | 72 65 64 2d 72 6d 61 69 |. \\[di|red-rmai|
|00000a80| 6c 5d 09 2d 2d 20 52 6d | 61 69 6c 20 6f 6e 20 66 |l].-- Rm|ail on f|
|00000a90| 6f 6c 64 65 72 0a 20 20 | 5c 5c 5b 64 69 72 65 64 |older. |\\[dired|
|00000aa0| 2d 64 6f 2d 69 6e 73 65 | 72 74 2d 73 75 62 64 69 |-do-inse|rt-subdi|
|00000ab0| 72 5d 09 2d 2d 20 69 6e | 73 65 72 74 20 61 6c 6c |r].-- in|sert all|
|00000ac0| 20 6d 61 72 6b 65 64 20 | 73 75 62 64 69 72 73 0a | marked |subdirs.|
|00000ad0| 20 20 5c 5c 5b 64 69 72 | 65 64 2d 64 6f 2d 66 69 | \\[dir|ed-do-fi|
|00000ae0| 6e 64 2d 66 69 6c 65 5d | 09 2d 2d 20 76 69 73 69 |nd-file]|.-- visi|
|00000af0| 74 20 61 6c 6c 20 6d 61 | 72 6b 65 64 20 66 69 6c |t all ma|rked fil|
|00000b00| 65 73 20 73 69 6d 75 6c | 74 61 6e 65 6f 75 73 6c |es simul|taneousl|
|00000b10| 79 0a 20 20 5c 5c 5b 64 | 69 72 65 64 2d 73 65 74 |y. \\[d|ired-set|
|00000b20| 2d 6d 61 72 6b 65 72 2d | 63 68 61 72 5d 2c 20 5c |-marker-|char], \|
|00000b30| 5c 5b 64 69 72 65 64 2d | 72 65 73 74 6f 72 65 2d |\[dired-|restore-|
|00000b40| 6d 61 72 6b 65 72 2d 63 | 68 61 72 5d 09 2d 2d 20 |marker-c|har].-- |
|00000b50| 63 68 61 6e 67 65 20 61 | 6e 64 20 64 69 73 70 6c |change a|nd displ|
|00000b60| 61 79 20 64 69 72 65 64 | 2d 6d 61 72 6b 65 72 2d |ay dired|-marker-|
|00000b70| 63 68 61 72 20 64 79 6e | 61 6d 69 63 61 6c 6c 79 |char dyn|amically|
|00000b80| 2e 0a 20 20 5c 5c 5b 64 | 69 72 65 64 2d 6f 6d 69 |.. \\[d|ired-omi|
|00000b90| 74 2d 74 6f 67 67 6c 65 | 5d 09 2d 2d 20 74 6f 67 |t-toggle|].-- tog|
|00000ba0| 67 6c 65 20 6f 6d 69 74 | 74 69 6e 67 20 6f 66 20 |gle omit|ting of |
|00000bb0| 66 69 6c 65 73 0a 20 20 | 5c 5c 5b 64 69 72 65 64 |files. |\\[dired|
|00000bc0| 2d 6d 61 72 6b 2d 73 65 | 78 70 5d 09 2d 2d 20 6d |-mark-se|xp].-- m|
|00000bd0| 61 72 6b 20 62 79 20 6c | 69 73 70 20 65 78 70 72 |ark by l|isp expr|
|00000be0| 65 73 73 69 6f 6e 0a 20 | 20 5c 5c 5b 64 69 72 65 |ession. | \\[dire|
|00000bf0| 64 2d 64 6f 2d 75 6e 6d | 61 72 6b 5d 09 2d 2d 20 |d-do-unm|ark].-- |
|00000c00| 72 65 70 6c 61 63 65 20 | 65 78 69 73 74 69 6e 67 |replace |existing|
|00000c10| 20 6d 61 72 6b 65 72 20 | 77 69 74 68 20 61 6e 6f | marker |with ano|
|00000c20| 74 68 65 72 2e 0a 20 20 | 5c 5c 5b 64 69 72 65 64 |ther.. |\\[dired|
|00000c30| 2d 6d 61 72 6b 2d 72 63 | 73 2d 66 69 6c 65 73 5d |-mark-rc|s-files]|
|00000c40| 09 2d 2d 20 6d 61 72 6b | 20 61 6c 6c 20 52 43 53 |.-- mark| all RCS|
|00000c50| 20 63 6f 6e 74 72 6f 6c | 6c 65 64 20 66 69 6c 65 | control|led file|
|00000c60| 73 0a 20 20 5c 5c 5b 64 | 69 72 65 64 2d 6d 61 72 |s. \\[d|ired-mar|
|00000c70| 6b 2d 66 69 6c 65 73 2d | 63 6f 6d 70 69 6c 61 74 |k-files-|compilat|
|00000c80| 69 6f 6e 2d 62 75 66 66 | 65 72 5d 09 2d 2d 20 6d |ion-buff|er].-- m|
|00000c90| 61 72 6b 20 63 6f 6d 70 | 69 6c 61 74 69 6f 6e 20 |ark comp|ilation |
|00000ca0| 66 69 6c 65 73 0a 20 20 | 5c 5c 5b 64 69 72 65 64 |files. |\\[dired|
|00000cb0| 2d 63 6f 70 79 2d 66 69 | 6c 65 6e 61 6d 65 2d 61 |-copy-fi|lename-a|
|00000cc0| 73 2d 6b 69 6c 6c 5d 09 | 2d 2d 20 63 6f 70 79 20 |s-kill].|-- copy |
|00000cd0| 74 68 65 20 66 69 6c 65 | 20 6f 72 20 73 75 62 64 |the file| or subd|
|00000ce0| 69 72 20 6e 61 6d 65 73 | 20 69 6e 74 6f 20 74 68 |ir names| into th|
|00000cf0| 65 20 6b 69 6c 6c 20 72 | 69 6e 67 2e 0a 20 20 09 |e kill r|ing.. .|
|00000d00| 20 20 20 59 6f 75 20 63 | 61 6e 20 66 65 65 64 20 | You c|an feed |
|00000d10| 69 74 20 74 6f 20 6f 74 | 68 65 72 20 63 6f 6d 6d |it to ot|her comm|
|00000d20| 61 6e 64 73 20 75 73 69 | 6e 67 20 5c 5c 5b 79 61 |ands usi|ng \\[ya|
|00000d30| 6e 6b 5d 2e 0a 0a 46 6f | 72 20 6d 6f 72 65 20 66 |nk]...Fo|r more f|
|00000d40| 65 61 74 75 72 65 73 2c | 20 73 65 65 20 76 61 72 |eatures,| see var|
|00000d50| 69 61 62 6c 65 73 0a 0a | 20 20 64 69 72 65 64 2d |iables..| dired-|
|00000d60| 6f 6d 69 74 2d 66 69 6c | 65 73 0a 20 20 64 69 72 |omit-fil|es. dir|
|00000d70| 65 64 2d 6f 6d 69 74 2d | 65 78 74 65 6e 73 74 69 |ed-omit-|extensti|
|00000d80| 6f 6e 73 0a 20 20 64 69 | 72 65 64 2d 64 61 6e 67 |ons. di|red-dang|
|00000d90| 65 72 6f 75 73 2d 73 68 | 65 6c 6c 2d 63 6f 6d 6d |erous-sh|ell-comm|
|00000da0| 61 6e 64 0a 20 20 64 69 | 72 65 64 2d 6d 61 72 6b |and. di|red-mark|
|00000db0| 2d 6b 65 79 73 0a 20 20 | 64 69 72 65 64 2d 6c 6f |-keys. |dired-lo|
|00000dc0| 63 61 6c 2d 76 61 72 69 | 61 62 6c 65 73 2d 66 69 |cal-vari|ables-fi|
|00000dd0| 6c 65 0a 20 20 64 69 72 | 65 64 2d 66 69 6e 64 2d |le. dir|ed-find-|
|00000de0| 73 75 62 64 69 72 0a 20 | 20 64 69 72 65 64 2d 67 |subdir. | dired-g|
|00000df0| 75 65 73 73 2d 68 61 76 | 65 2d 67 6e 75 74 61 72 |uess-hav|e-gnutar|
|00000e00| 0a 20 20 64 69 72 65 64 | 2d 61 75 74 6f 2d 73 68 |. dired|-auto-sh|
|00000e10| 65 6c 6c 2d 63 6f 6d 6d | 61 6e 64 2d 61 6c 69 73 |ell-comm|and-alis|
|00000e20| 74 0a 0a 53 65 65 20 61 | 6c 73 6f 20 66 75 6e 63 |t..See a|lso func|
|00000e30| 74 69 6f 6e 73 0a 0a 20 | 20 64 69 72 65 64 2d 73 |tions.. | dired-s|
|00000e40| 6f 72 74 2d 6f 6e 2d 73 | 69 7a 65 0a 20 20 64 69 |ort-on-s|ize. di|
|00000e50| 72 65 64 2d 64 6f 2d 72 | 65 6c 73 79 6d 6c 69 6e |red-do-r|elsymlin|
|00000e60| 6b 0a 20 20 64 69 72 65 | 64 2d 66 6c 61 67 2d 65 |k. dire|d-flag-e|
|00000e70| 78 74 65 6e 73 69 6f 6e | 0a 20 20 64 69 72 65 64 |xtension|. dired|
|00000e80| 2d 76 69 72 74 75 61 6c | 0a 20 20 64 69 72 65 64 |-virtual|. dired|
|00000e90| 2d 6a 75 6d 70 2d 62 61 | 63 6b 0a 20 20 64 69 72 |-jump-ba|ck. dir|
|00000ea0| 65 64 2d 6a 75 6d 70 2d | 62 61 63 6b 2d 6f 74 68 |ed-jump-|back-oth|
|00000eb0| 65 72 2d 77 69 6e 64 6f | 77 0a 22 20 6e 69 6c 5d |er-windo|w." nil]|
|00000ec0| 29 0a 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 c1 |).(byte-|code "..|
|00000ed0| 21 ac 8b c2 c3 4b 21 ab | 85 c4 c5 c6 5c 22 88 c0 |!....K!.|....\"..|
|00000ee0| c1 21 ab 8f c7 c8 c9 0e | 5c 6e 23 88 cb cc 4d 88 |.!......|\n#...M.|
|00000ef0| cd ce 4d 88 c0 87 22 20 | 5b 66 62 6f 75 6e 64 70 |..M..." |[fboundp|
|00000f00| 20 72 65 61 64 2d 77 69 | 74 68 2d 68 69 73 74 6f | read-wi|th-histo|
|00000f10| 72 79 2d 69 6e 20 73 75 | 62 72 70 20 72 65 61 64 |ry-in su|brp read|
|00000f20| 2d 66 72 6f 6d 2d 6d 69 | 6e 69 62 75 66 66 65 72 |-from-mi|nibuffer|
|00000f30| 20 6c 6f 61 64 20 22 67 | 6d 68 69 73 74 22 20 74 | load "g|mhist" t|
|00000f40| 20 70 75 74 20 64 69 72 | 65 64 2d 73 68 65 6c 6c | put dir|ed-shell|
|00000f50| 2d 63 6f 6d 6d 61 6e 64 | 2d 68 69 73 74 6f 72 79 |-command|-history|
|00000f60| 20 64 61 6e 67 65 72 6f | 75 73 20 64 69 72 65 64 | dangero|us dired|
|00000f70| 2d 64 61 6e 67 65 72 6f | 75 73 2d 73 68 65 6c 6c |-dangero|us-shell|
|00000f80| 2d 63 6f 6d 6d 61 6e 64 | 20 64 69 72 65 64 2d 72 |-command| dired-r|
|00000f90| 65 61 64 2d 72 65 67 65 | 78 70 20 23 5b 28 70 72 |ead-rege|xp #[(pr|
|00000fa0| 6f 6d 70 74 20 26 6f 70 | 74 69 6f 6e 61 6c 20 69 |ompt &op|tional i|
|00000fb0| 6e 69 74 69 61 6c 29 20 | 22 08 ac 87 c1 c2 0b 08 |nitial) |".......|
|00000fc0| 23 aa 8f c4 c2 c5 c6 23 | 88 c4 c2 c5 c1 c2 0b 08 |#......#|........|
|00000fd0| 23 23 89 16 07 87 22 20 | 5b 69 6e 69 74 69 61 6c |##...." |[initial|
|00000fe0| 20 72 65 61 64 2d 77 69 | 74 68 2d 68 69 73 74 6f | read-wi|th-histo|
|00000ff0| 72 79 2d 69 6e 20 72 65 | 67 65 78 70 2d 68 69 73 |ry-in re|gexp-his|
|00001000| 74 6f 72 79 20 70 72 6f | 6d 70 74 20 70 75 74 20 |tory pro|mpt put |
|00001010| 64 65 66 61 75 6c 74 20 | 6e 69 6c 20 64 69 72 65 |default |nil dire|
|00001020| 64 2d 66 6c 61 67 67 69 | 6e 67 2d 72 65 67 65 78 |d-flaggi|ng-regex|
|00001030| 70 5d 20 37 5d 20 64 69 | 72 65 64 2d 72 65 61 64 |p] 7] di|red-read|
|00001040| 2d 64 69 72 2d 61 6e 64 | 2d 73 77 69 74 63 68 65 |-dir-and|-switche|
|00001050| 73 20 23 5b 28 73 74 72 | 29 20 22 08 ad 84 c1 c2 |s #[(str|) ".....|
|00001060| 0b 5c 22 c4 c5 c6 c7 0e | 08 5c 22 c9 0e 5c 6e c9 |.\".....|.\"..\n.|
|00001070| 25 44 9f 87 22 20 5b 63 | 75 72 72 65 6e 74 2d 70 |%D.." [c|urrent-p|
|00001080| 72 65 66 69 78 2d 61 72 | 67 20 72 65 61 64 2d 73 |refix-ar|g read-s|
|00001090| 74 72 69 6e 67 20 22 44 | 69 72 65 64 20 6c 69 73 |tring "D|ired lis|
|000010a0| 74 69 6e 67 20 73 77 69 | 74 63 68 65 73 3a 20 22 |ting swi|tches: "|
|000010b0| 20 64 69 72 65 64 2d 6c | 69 73 74 69 6e 67 2d 73 | dired-l|isting-s|
|000010c0| 77 69 74 63 68 65 73 20 | 72 65 61 64 2d 66 69 6c |witches |read-fil|
|000010d0| 65 2d 6e 61 6d 65 2d 77 | 69 74 68 2d 68 69 73 74 |e-name-w|ith-hist|
|000010e0| 6f 72 79 2d 69 6e 20 66 | 69 6c 65 2d 68 69 73 74 |ory-in f|ile-hist|
|000010f0| 6f 72 79 20 66 6f 72 6d | 61 74 20 22 44 69 72 65 |ory form|at "Dire|
|00001100| 64 20 25 73 28 64 69 72 | 65 63 74 6f 72 79 29 3a |d %s(dir|ectory):|
|00001110| 20 22 20 73 74 72 20 6e | 69 6c 20 64 65 66 61 75 | " str n|il defau|
|00001120| 6c 74 2d 64 69 72 65 63 | 74 6f 72 79 5d 20 37 5d |lt-direc|tory] 7]|
|00001130| 5d 20 34 29 0a 28 66 73 | 65 74 20 27 64 69 72 65 |] 4).(fs|et 'dire|
|00001140| 64 2d 6d 61 72 6b 2d 77 | 69 74 68 2d 74 68 69 73 |d-mark-w|ith-this|
|00001150| 2d 63 68 61 72 20 23 5b | 28 61 72 67 29 20 22 08 |-char #[|(arg) ".|
|00001160| 19 c2 0b 21 29 87 22 20 | 5b 6c 61 73 74 2d 63 6f |...!)." |[last-co|
|00001170| 6d 6d 61 6e 64 2d 63 68 | 61 72 20 64 69 72 65 64 |mmand-ch|ar dired|
|00001180| 2d 6d 61 72 6b 65 72 2d | 63 68 61 72 20 64 69 72 |-marker-|char dir|
|00001190| 65 64 2d 6d 61 72 6b 2d | 73 75 62 64 69 72 2d 6f |ed-mark-|subdir-o|
|000011a0| 72 2d 66 69 6c 65 20 61 | 72 67 5d 20 32 20 22 5c |r-file a|rg] 2 "\|
|000011b0| 0a 4d 61 72 6b 20 74 68 | 65 20 63 75 72 72 65 6e |.Mark th|e curren|
|000011c0| 74 20 66 69 6c 65 20 6f | 72 20 73 75 62 64 69 72 |t file o|r subdir|
|000011d0| 20 77 69 74 68 20 74 68 | 65 20 6c 61 73 74 20 6b | with th|e last k|
|000011e0| 65 79 20 79 6f 75 20 70 | 72 65 73 73 65 64 20 74 |ey you p|ressed t|
|000011f0| 6f 20 69 6e 76 6f 6b 65 | 0a 74 68 69 73 20 63 6f |o invoke|.this co|
|00001200| 6d 6d 61 6e 64 2e 20 20 | 45 6c 73 65 20 6c 69 6b |mmand. |Else lik|
|00001210| 65 20 5c 5c 5b 64 69 72 | 65 64 2d 6d 61 72 6b 2d |e \\[dir|ed-mark-|
|00001220| 73 75 62 64 69 72 2d 6f | 72 2d 66 69 6c 65 5d 20 |subdir-o|r-file] |
|00001230| 63 6f 6d 6d 61 6e 64 2e | 22 20 22 70 22 5d 29 0a |command.|" "p"]).|
|00001240| 28 64 65 66 76 61 72 20 | 64 69 72 65 64 2d 6d 61 |(defvar |dired-ma|
|00001250| 72 6b 65 72 2d 73 74 61 | 63 6b 20 6e 69 6c 20 22 |rker-sta|ck nil "|
|00001260| 5c 0a 4c 69 73 74 20 6f | 66 20 70 72 65 76 69 6f |\.List o|f previo|
|00001270| 75 73 6c 79 20 75 73 65 | 64 20 64 69 72 65 64 20 |usly use|d dired |
|00001280| 6d 61 72 6b 65 72 20 63 | 68 61 72 61 63 74 65 72 |marker c|haracter|
|00001290| 73 2e 22 29 0a 28 64 65 | 66 76 61 72 20 64 69 72 |s.").(de|fvar dir|
|000012a0| 65 64 2d 6d 61 72 6b 65 | 72 2d 73 74 72 69 6e 67 |ed-marke|r-string|
|000012b0| 20 22 22 20 22 5c 0a 53 | 74 72 69 6e 67 20 76 65 | "" "\.S|tring ve|
|000012c0| 72 73 69 6f 6e 20 6f 66 | 20 60 64 69 72 65 64 2d |rsion of| `dired-|
|000012d0| 6d 61 72 6b 65 72 2d 73 | 74 61 63 6b 27 2e 22 29 |marker-s|tack'.")|
|000012e0| 0a 28 66 73 65 74 20 27 | 64 69 72 65 64 2d 63 75 |.(fset '|dired-cu|
|000012f0| 72 72 65 6e 74 2d 6d 61 | 72 6b 65 72 2d 73 74 72 |rrent-ma|rker-str|
|00001300| 69 6e 67 20 23 5b 6e 69 | 6c 20 22 c0 c1 c2 c3 0c |ing #[ni|l ".....|
|00001310| 21 c5 23 50 89 16 06 87 | 22 20 5b 22 20 22 20 6d |!.#P....|" [" " m|
|00001320| 61 70 63 6f 6e 63 61 74 | 20 63 68 61 72 2d 74 6f |apconcat| char-to|
|00001330| 2d 73 74 72 69 6e 67 20 | 72 65 76 65 72 73 65 20 |-string |reverse |
|00001340| 64 69 72 65 64 2d 6d 61 | 72 6b 65 72 2d 73 74 61 |dired-ma|rker-sta|
|00001350| 63 6b 20 22 22 20 64 69 | 72 65 64 2d 6d 61 72 6b |ck "" di|red-mark|
|00001360| 65 72 2d 73 74 72 69 6e | 67 5d 20 35 20 22 5c 0a |er-strin|g] 5 "\.|
|00001370| 43 6f 6d 70 75 74 65 73 | 20 61 6e 64 20 72 65 74 |Computes| and ret|
|00001380| 75 72 6e 73 20 60 64 69 | 72 65 64 2d 6d 61 72 6b |urns `di|red-mark|
|00001390| 65 72 2d 73 74 72 69 6e | 67 27 2e 22 5d 29 0a 28 |er-strin|g'."]).(|
|000013a0| 66 73 65 74 20 27 64 69 | 72 65 64 2d 6d 61 72 6b |fset 'di|red-mark|
|000013b0| 65 72 2d 73 74 61 63 6b | 2d 73 74 61 72 74 75 70 |er-stack|-startup|
|000013c0| 20 23 5b 6e 69 6c 20 22 | c0 c1 21 88 c0 c2 21 88 | #[nil "|..!...!.|
|000013d0| c0 c3 21 88 c3 0c 9e ae | 85 c5 0c 42 89 14 87 22 |..!.....|...B..."|
|000013e0| 20 5b 6d 61 6b 65 2d 6c | 6f 63 61 6c 2d 76 61 72 | [make-l|ocal-var|
|000013f0| 69 61 62 6c 65 20 64 69 | 72 65 64 2d 6d 61 72 6b |iable di|red-mark|
|00001400| 65 72 2d 63 68 61 72 20 | 64 69 72 65 64 2d 64 65 |er-char |dired-de|
|00001410| 6c 2d 6d 61 72 6b 65 72 | 20 64 69 72 65 64 2d 6d |l-marker| dired-m|
|00001420| 61 72 6b 65 72 2d 73 74 | 61 63 6b 20 6d 69 6e 6f |arker-st|ack mino|
|00001430| 72 2d 6d 6f 64 65 2d 61 | 6c 69 73 74 20 28 64 69 |r-mode-a|list (di|
|00001440| 72 65 64 2d 6d 61 72 6b | 65 72 2d 73 74 61 63 6b |red-mark|er-stack|
|00001450| 20 64 69 72 65 64 2d 6d | 61 72 6b 65 72 2d 73 74 | dired-m|arker-st|
|00001460| 72 69 6e 67 29 5d 20 32 | 5d 29 0a 28 66 73 65 74 |ring)] 2|]).(fset|
|00001470| 20 27 64 69 72 65 64 2d | 73 65 74 2d 6d 61 72 6b | 'dired-|set-mark|
|00001480| 65 72 2d 63 68 61 72 20 | 23 5b 28 63 29 20 22 08 |er-char |#[(c) ".|
|00001490| 09 42 11 c2 20 88 08 13 | c4 c5 20 21 88 c6 c7 0b |.B.. ...|.. !....|
|000014a0| 5c 22 87 22 20 5b 63 20 | 64 69 72 65 64 2d 6d 61 |\"." [c |dired-ma|
|000014b0| 72 6b 65 72 2d 73 74 61 | 63 6b 20 64 69 72 65 64 |rker-sta|ck dired|
|000014c0| 2d 63 75 72 72 65 6e 74 | 2d 6d 61 72 6b 65 72 2d |-current|-marker-|
|000014d0| 73 74 72 69 6e 67 20 64 | 69 72 65 64 2d 6d 61 72 |string d|ired-mar|
|000014e0| 6b 65 72 2d 63 68 61 72 | 20 73 65 74 2d 62 75 66 |ker-char| set-buf|
|000014f0| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 20 62 |fer-modi|fied-p b|
|00001500| 75 66 66 65 72 2d 6d 6f | 64 69 66 69 65 64 2d 70 |uffer-mo|dified-p|
|00001510| 20 6d 65 73 73 61 67 65 | 20 22 4e 65 77 20 6d 61 | message| "New ma|
|00001520| 72 6b 65 72 20 69 73 20 | 25 63 22 5d 20 33 20 22 |rker is |%c"] 3 "|
|00001530| 5c 0a 53 65 74 20 74 68 | 65 20 6d 61 72 6b 65 72 |\.Set th|e marker|
|00001540| 20 63 68 61 72 61 63 74 | 65 72 20 74 6f 20 73 6f | charact|er to so|
|00001550| 6d 65 74 68 69 6e 67 20 | 65 6c 73 65 2e 0a 55 73 |mething |else..Us|
|00001560| 65 20 5c 5c 5b 64 69 72 | 65 64 2d 72 65 73 74 6f |e \\[dir|ed-resto|
|00001570| 72 65 2d 6d 61 72 6b 65 | 72 2d 63 68 61 72 5d 20 |re-marke|r-char] |
|00001580| 74 6f 20 72 65 73 74 6f | 72 65 20 74 68 65 20 70 |to resto|re the p|
|00001590| 72 65 76 69 6f 75 73 20 | 76 61 6c 75 65 2e 22 20 |revious |value." |
|000015a0| 22 63 4e 65 77 20 6d 61 | 72 6b 65 72 20 63 68 61 |"cNew ma|rker cha|
|000015b0| 72 61 63 74 65 72 3a 20 | 22 5d 29 0a 28 66 73 65 |racter: |"]).(fse|
|000015c0| 74 20 27 64 69 72 65 64 | 2d 72 65 73 74 6f 72 65 |t 'dired|-restore|
|000015d0| 2d 6d 61 72 6b 65 72 2d | 63 68 61 72 20 23 5b 6e |-marker-|char #[n|
|000015e0| 69 6c 20 22 08 41 89 10 | 40 11 c2 20 88 c3 c4 20 |il ".A..|@.. ... |
|000015f0| 21 88 09 ac 82 0d 11 c6 | c7 09 5c 22 87 22 20 5b |!.......|..\"." [|
|00001600| 64 69 72 65 64 2d 6d 61 | 72 6b 65 72 2d 73 74 61 |dired-ma|rker-sta|
|00001610| 63 6b 20 64 69 72 65 64 | 2d 6d 61 72 6b 65 72 2d |ck dired|-marker-|
|00001620| 63 68 61 72 20 64 69 72 | 65 64 2d 63 75 72 72 65 |char dir|ed-curre|
|00001630| 6e 74 2d 6d 61 72 6b 65 | 72 2d 73 74 72 69 6e 67 |nt-marke|r-string|
|00001640| 20 73 65 74 2d 62 75 66 | 66 65 72 2d 6d 6f 64 69 | set-buf|fer-modi|
|00001650| 66 69 65 64 2d 70 20 62 | 75 66 66 65 72 2d 6d 6f |fied-p b|uffer-mo|
|00001660| 64 69 66 69 65 64 2d 70 | 20 64 69 72 65 64 2d 64 |dified-p| dired-d|
|00001670| 65 66 61 75 6c 74 2d 6d | 61 72 6b 65 72 20 6d 65 |efault-m|arker me|
|00001680| 73 73 61 67 65 20 22 4d | 61 72 6b 65 72 20 69 73 |ssage "M|arker is|
|00001690| 20 25 63 22 5d 20 34 20 | 22 5c 0a 52 65 73 74 6f | %c"] 4 |"\.Resto|
|000016a0| 72 65 20 74 68 65 20 6d | 61 72 6b 65 72 20 63 68 |re the m|arker ch|
|000016b0| 61 72 61 63 74 65 72 20 | 74 6f 20 69 74 73 20 70 |aracter |to its p|
|000016c0| 72 65 76 69 6f 75 73 20 | 76 61 6c 75 65 2e 0a 55 |revious |value..U|
|000016d0| 73 65 73 20 60 64 69 72 | 65 64 2d 64 65 66 61 75 |ses `dir|ed-defau|
|000016e0| 6c 74 2d 6d 61 72 6b 65 | 72 27 20 69 66 20 74 68 |lt-marke|r' if th|
|000016f0| 65 20 6d 61 72 6b 65 72 | 20 73 74 61 63 6b 20 69 |e marker| stack i|
|00001700| 73 20 65 6d 70 74 79 2e | 22 20 6e 69 6c 5d 29 0a |s empty.|" nil]).|
|00001710| 28 66 73 65 74 20 27 64 | 69 72 65 64 2d 73 6f 72 |(fset 'd|ired-sor|
|00001720| 74 2d 6f 6e 2d 73 69 7a | 65 20 23 5b 6e 69 6c 20 |t-on-siz|e #[nil |
|00001730| 22 c0 c1 21 88 65 62 88 | c2 20 88 c3 79 88 c4 c5 |"..!.eb.|. ..y...|
|00001740| c6 c7 c8 24 87 22 20 5b | 72 65 71 75 69 72 65 20 |...$." [|require |
|00001750| 73 6f 72 74 20 64 69 72 | 65 64 2d 67 6f 74 6f 2d |sort dir|ed-goto-|
|00001760| 6e 65 78 74 2d 66 69 6c | 65 20 30 20 73 6f 72 74 |next-fil|e 0 sort|
|00001770| 2d 73 75 62 72 20 74 20 | 66 6f 72 77 61 72 64 2d |-subr t |forward-|
|00001780| 6c 69 6e 65 20 65 6e 64 | 2d 6f 66 2d 6c 69 6e 65 |line end|-of-line|
|00001790| 20 64 69 72 65 64 2d 67 | 65 74 2d 66 69 6c 65 2d | dired-g|et-file-|
|000017a0| 73 69 7a 65 5d 20 35 20 | 22 5c 0a 53 6f 72 74 73 |size] 5 |"\.Sorts|
|000017b0| 20 61 20 64 69 72 65 64 | 20 6c 69 73 74 69 6e 67 | a dired| listing|
|000017c0| 20 6f 6e 20 66 69 6c 65 | 20 73 69 7a 65 2e 0a 49 | on file| size..I|
|000017d0| 66 20 79 6f 75 72 20 6c | 73 20 63 61 6e 6e 6f 74 |f your l|s cannot|
|000017e0| 20 73 6f 72 74 20 6f 6e | 20 73 69 7a 65 2c 20 74 | sort on| size, t|
|000017f0| 68 69 73 20 69 73 20 75 | 73 65 66 75 6c 20 61 73 |his is u|seful as|
|00001800| 20 60 64 69 72 65 64 2d | 61 66 74 65 72 2d 72 65 | `dired-|after-re|
|00001810| 61 64 69 6e 2d 68 6f 6f | 6b 27 3a 0a 20 20 20 20 |adin-hoo|k':. |
|00001820| 28 73 65 74 71 20 64 69 | 72 65 64 2d 61 66 74 65 |(setq di|red-afte|
|00001830| 72 2d 72 65 61 64 69 6e | 2d 68 6f 6f 6b 20 27 64 |r-readin|-hook 'd|
|00001840| 69 72 65 64 2d 73 6f 72 | 74 2d 6f 6e 2d 73 69 7a |ired-sor|t-on-siz|
|00001850| 65 29 22 5d 29 0a 28 66 | 73 65 74 20 27 64 69 72 |e)"]).(f|set 'dir|
|00001860| 65 64 2d 67 65 74 2d 66 | 69 6c 65 2d 73 69 7a 65 |ed-get-f|ile-size|
|00001870| 20 23 5b 6e 69 6c 20 22 | c0 c1 21 88 c2 94 62 88 | #[nil "|..!...b.|
|00001880| c3 75 88 c4 8a c5 c2 21 | 88 60 29 60 7b 21 87 22 |.u.....!|.`)`{!."|
|00001890| 20 5b 72 65 2d 73 65 61 | 72 63 68 2d 66 6f 72 77 | [re-sea|rch-forw|
|000018a0| 61 72 64 20 22 5c 5c 28 | 4a 61 6e 5c 5c 7c 46 65 |ard "\\(|Jan\\|Fe|
|000018b0| 62 5c 5c 7c 4d 61 72 5c | 5c 7c 41 70 72 5c 5c 7c |b\\|Mar\|\|Apr\\||
|000018c0| 4d 61 79 5c 5c 7c 4a 75 | 6e 5c 5c 7c 4a 75 6c 5c |May\\|Ju|n\\|Jul\|
|000018d0| 5c 7c 41 75 67 5c 5c 7c | 53 65 70 5c 5c 7c 4f 63 |\|Aug\\||Sep\\|Oc|
|000018e0| 74 5c 5c 7c 4e 6f 76 5c | 5c 7c 44 65 63 5c 5c 29 |t\\|Nov\|\|Dec\\)|
|000018f0| 22 20 31 20 2d 31 20 73 | 74 72 69 6e 67 2d 74 6f |" 1 -1 s|tring-to|
|00001900| 2d 69 6e 74 20 62 61 63 | 6b 77 61 72 64 2d 77 6f |-int bac|kward-wo|
|00001910| 72 64 5d 20 33 5d 29 0a | 28 64 65 66 76 61 72 20 |rd] 3]).|(defvar |
|00001920| 64 69 72 65 64 2d 76 6d | 2d 72 65 61 64 2d 6f 6e |dired-vm|-read-on|
|00001930| 6c 79 2d 66 6f 6c 64 65 | 72 73 20 6e 69 6c 20 22 |ly-folde|rs nil "|
|00001940| 5c 0a 2a 49 66 20 74 2c | 20 5c 5c 5b 64 69 72 65 |\.*If t,| \\[dire|
|00001950| 64 2d 76 6d 5d 20 77 69 | 6c 6c 20 76 69 73 69 74 |d-vm] wi|ll visit|
|00001960| 20 61 6c 6c 20 66 6f 6c | 64 65 72 73 20 72 65 61 | all fol|ders rea|
|00001970| 64 2d 6f 6e 6c 79 2e 0a | 49 66 20 6e 65 69 74 68 |d-only..|If neith|
|00001980| 65 72 20 6e 69 6c 20 6e | 6f 72 20 74 2c 20 65 2e |er nil n|or t, e.|
|00001990| 67 2e 20 74 68 65 20 73 | 79 6d 62 6f 6c 20 60 69 |g. the s|ymbol `i|
|000019a0| 66 2d 66 69 6c 65 2d 72 | 65 61 64 2d 6f 6e 6c 79 |f-file-r|ead-only|
|000019b0| 27 2c 20 6f 6e 6c 79 0a | 66 69 6c 65 73 20 6e 6f |', only.|files no|
|000019c0| 74 20 77 72 69 74 61 62 | 6c 65 20 62 79 20 79 6f |t writab|le by yo|
|000019d0| 75 20 61 72 65 20 76 69 | 73 69 74 65 64 20 72 65 |u are vi|sited re|
|000019e0| 61 64 2d 6f 6e 6c 79 2e | 0a 0a 52 65 61 64 2d 6f |ad-only.|..Read-o|
|000019f0| 6e 6c 79 20 66 6f 6c 64 | 65 72 73 20 6f 6e 6c 79 |nly fold|ers only|
|00001a00| 20 77 6f 72 6b 20 69 6e | 20 56 4d 20 35 2c 20 6e | work in| VM 5, n|
|00001a10| 6f 74 20 69 6e 20 56 4d | 20 34 2e 22 29 0a 28 66 |ot in VM| 4.").(f|
|00001a20| 73 65 74 20 27 64 69 72 | 65 64 2d 76 6d 20 23 5b |set 'dir|ed-vm #[|
|00001a30| 28 26 6f 70 74 69 6f 6e | 61 6c 20 72 65 61 64 2d |(&option|al read-|
|00001a40| 6f 6e 6c 79 29 20 22 c0 | 20 c1 20 1a 1b 0c ab 87 |only) ".| . .....|
|00001a50| c5 5c 6e c6 5c 22 88 aa | 9f 0e 07 c6 3d ab 87 c5 |.\n.\"..|....=...|
|00001a60| 5c 6e c6 5c 22 88 aa 92 | 0e 07 ac 86 c5 5c 6e 21 |\n.\"...|.....\n!|
|00001a70| 88 aa 88 c5 5c 6e c8 5c | 6e 21 3f 5c 22 88 c9 ca |....\n.\|n!?\"...|
|00001a80| 21 0b 4c 2a 87 22 20 5b | 64 69 72 65 64 2d 63 75 |!.L*." [|dired-cu|
|00001a90| 72 72 65 6e 74 2d 64 69 | 72 65 63 74 6f 72 79 20 |rrent-di|rectory |
|00001aa0| 64 69 72 65 64 2d 67 65 | 74 2d 66 69 6c 65 6e 61 |dired-ge|t-filena|
|00001ab0| 6d 65 20 66 69 6c 20 64 | 69 72 20 72 65 61 64 2d |me fil d|ir read-|
|00001ac0| 6f 6e 6c 79 20 76 6d 2d | 76 69 73 69 74 2d 66 6f |only vm-|visit-fo|
|00001ad0| 6c 64 65 72 20 74 20 64 | 69 72 65 64 2d 76 6d 2d |lder t d|ired-vm-|
|00001ae0| 72 65 61 64 2d 6f 6e 6c | 79 2d 66 6f 6c 64 65 72 |read-onl|y-folder|
|00001af0| 73 20 66 69 6c 65 2d 77 | 72 69 74 61 62 6c 65 2d |s file-w|ritable-|
|00001b00| 70 20 6d 61 6b 65 2d 6c | 6f 63 61 6c 2d 76 61 72 |p make-l|ocal-var|
|00001b10| 69 61 62 6c 65 20 76 6d | 2d 66 6f 6c 64 65 72 2d |iable vm|-folder-|
|00001b20| 64 69 72 65 63 74 6f 72 | 79 5d 20 34 20 22 5c 0a |director|y] 4 "\.|
|00001b30| 52 75 6e 20 56 4d 20 6f | 6e 20 74 68 69 73 20 66 |Run VM o|n this f|
|00001b40| 69 6c 65 2e 0a 57 69 74 | 68 20 70 72 65 66 69 78 |ile..Wit|h prefix|
|00001b50| 20 61 72 67 2c 20 76 69 | 73 69 74 20 66 6f 6c 64 | arg, vi|sit fold|
|00001b60| 65 72 20 72 65 61 64 2d | 6f 6e 6c 79 20 28 74 68 |er read-|only (th|
|00001b70| 69 73 20 72 65 71 75 69 | 72 65 73 20 61 74 20 6c |is requi|res at l|
|00001b80| 65 61 73 74 20 56 4d 20 | 35 29 2e 0a 53 65 65 20 |east VM |5)..See |
|00001b90| 61 6c 73 6f 20 76 61 72 | 69 61 62 6c 65 20 60 64 |also var|iable `d|
|00001ba0| 69 72 65 64 2d 76 6d 2d | 72 65 61 64 2d 6f 6e 6c |ired-vm-|read-onl|
|00001bb0| 79 2d 66 6f 6c 64 65 72 | 73 27 2e 22 20 22 50 22 |y-folder|s'." "P"|
|00001bc0| 5d 29 0a 28 66 73 65 74 | 20 27 64 69 72 65 64 2d |]).(fset| 'dired-|
|00001bd0| 72 6d 61 69 6c 20 23 5b | 6e 69 6c 20 22 c0 c1 20 |rmail #[|nil ".. |
|00001be0| 21 87 22 20 5b 72 6d 61 | 69 6c 20 64 69 72 65 64 |!." [rma|il dired|
|00001bf0| 2d 67 65 74 2d 66 69 6c | 65 6e 61 6d 65 5d 20 32 |-get-fil|ename] 2|
|00001c00| 20 22 5c 0a 52 75 6e 20 | 52 4d 41 49 4c 20 6f 6e | "\.Run |RMAIL on|
|00001c10| 20 74 68 69 73 20 66 69 | 6c 65 2e 22 20 6e 69 6c | this fi|le." nil|
|00001c20| 5d 29 0a 28 66 73 65 74 | 20 27 64 69 72 65 64 2d |]).(fset| 'dired-|
|00001c30| 64 6f 2d 69 6e 73 65 72 | 74 2d 73 75 62 64 69 72 |do-inser|t-subdir|
|00001c40| 20 23 5b 6e 69 6c 20 22 | c0 20 ae 83 c1 c2 21 89 | #[nil "|. ....!.|
|00001c50| 1b ad 94 c4 0b 40 21 ab | 87 8a c5 0b 40 21 88 29 |.....@!.|....@!.)|
|00001c60| 0b 41 89 13 ac 6d c6 29 | 87 22 20 5b 64 69 72 65 |.A...m.)|." [dire|
|00001c70| 64 2d 6d 61 72 6b 2d 67 | 65 74 2d 66 69 6c 65 73 |d-mark-g|et-files|
|00001c80| 20 65 72 72 6f 72 20 22 | 4e 6f 20 66 69 6c 65 73 | error "|No files|
|00001c90| 20 6d 61 72 6b 65 64 2e | 22 20 66 69 6c 65 73 20 | marked.|" files |
|00001ca0| 66 69 6c 65 2d 64 69 72 | 65 63 74 6f 72 79 2d 70 |file-dir|ectory-p|
|00001cb0| 20 64 69 72 65 64 2d 6d | 61 79 62 65 2d 69 6e 73 | dired-m|aybe-ins|
|00001cc0| 65 72 74 2d 73 75 62 64 | 69 72 20 6e 69 6c 5d 20 |ert-subd|ir nil] |
|00001cd0| 33 20 22 5c 0a 49 6e 73 | 65 72 74 20 61 6c 6c 20 |3 "\.Ins|ert all |
|00001ce0| 6d 61 72 6b 65 64 20 73 | 75 62 64 69 72 65 63 74 |marked s|ubdirect|
|00001cf0| 6f 72 69 65 73 20 69 6e | 20 73 69 74 75 20 74 68 |ories in| situ th|
|00001d00| 61 74 20 61 72 65 20 6e | 6f 74 20 79 65 74 20 69 |at are n|ot yet i|
|00001d10| 6e 73 65 72 74 65 64 2e | 0a 4e 6f 6e 2d 64 69 72 |nserted.|.Non-dir|
|00001d20| 65 63 74 6f 72 69 65 73 | 20 61 72 65 20 73 69 6c |ectories| are sil|
|00001d30| 65 6e 74 6c 79 20 69 67 | 6e 6f 72 65 64 2e 22 20 |ently ig|nored." |
|00001d40| 6e 69 6c 5d 29 0a 28 66 | 73 65 74 20 27 64 69 72 |nil]).(f|set 'dir|
|00001d50| 65 64 2d 6d 61 72 6b 2d | 65 78 74 65 6e 73 69 6f |ed-mark-|extensio|
|00001d60| 6e 20 23 5b 28 65 78 74 | 65 6e 73 69 6f 6e 20 26 |n #[(ext|ension &|
|00001d70| 6f 70 74 69 6f 6e 61 6c | 20 6d 61 72 6b 65 72 2d |optional| marker-|
|00001d80| 63 68 61 72 29 20 22 08 | 3c ac 83 08 43 10 c1 c2 |char) ".|<...C...|
|00001d90| c3 c4 c5 08 c6 23 c7 52 | 0e 08 5c 22 87 22 20 5b |.....#.R|..\"." [|
|00001da0| 65 78 74 65 6e 73 69 6f | 6e 20 64 69 72 65 64 2d |extensio|n dired-|
|00001db0| 6d 61 72 6b 2d 66 69 6c | 65 73 2d 72 65 67 65 78 |mark-fil|es-regex|
|00001dc0| 70 20 22 2e 22 20 22 5c | 5c 28 22 20 6d 61 70 63 |p "." "\|\(" mapc|
|00001dd0| 6f 6e 63 61 74 20 72 65 | 67 65 78 70 2d 71 75 6f |oncat re|gexp-quo|
|00001de0| 74 65 20 22 5c 5c 7c 22 | 20 22 5c 5c 29 24 22 20 |te "\\|"| "\\)$" |
|00001df0| 6d 61 72 6b 65 72 2d 63 | 68 61 72 5d 20 37 20 22 |marker-c|har] 7 "|
|00001e00| 5c 0a 4d 61 72 6b 20 61 | 6c 6c 20 66 69 6c 65 73 |\.Mark a|ll files|
|00001e10| 20 77 69 74 68 20 61 20 | 63 65 72 74 61 69 6e 20 | with a |certain |
|00001e20| 65 78 74 65 6e 73 69 6f | 6e 20 66 6f 72 20 75 73 |extensio|n for us|
|00001e30| 65 20 69 6e 20 6c 61 74 | 65 72 20 63 6f 6d 6d 61 |e in lat|er comma|
|00001e40| 6e 64 73 2e 0a 41 20 60 | 2e 27 20 69 73 20 6e 6f |nds..A `|.' is no|
|00001e50| 74 20 61 75 74 6f 6d 61 | 74 69 63 61 6c 6c 79 20 |t automa|tically |
|00001e60| 70 72 65 70 65 6e 64 65 | 64 20 74 6f 20 74 68 65 |prepende|d to the|
|00001e70| 20 73 74 72 69 6e 67 20 | 65 6e 74 65 72 65 64 2e | string |entered.|
|00001e80| 22 20 22 73 4d 61 72 6b | 69 6e 67 20 65 78 74 65 |" "sMark|ing exte|
|00001e90| 6e 73 69 6f 6e 3a 20 5c | 6e 50 22 5d 29 0a 28 66 |nsion: \|nP"]).(f|
|00001ea0| 73 65 74 20 27 64 69 72 | 65 64 2d 66 6c 61 67 2d |set 'dir|ed-flag-|
|00001eb0| 65 78 74 65 6e 73 69 6f | 6e 20 23 5b 28 65 78 74 |extensio|n #[(ext|
|00001ec0| 65 6e 73 69 6f 6e 29 20 | 22 c0 09 5c 6e 5c 22 87 |ension) |"..\n\".|
|00001ed0| 22 20 5b 64 69 72 65 64 | 2d 6d 61 72 6b 2d 65 78 |" [dired|-mark-ex|
|00001ee0| 74 65 6e 73 69 6f 6e 20 | 65 78 74 65 6e 73 69 6f |tension |extensio|
|00001ef0| 6e 20 64 69 72 65 64 2d | 64 65 6c 2d 6d 61 72 6b |n dired-|del-mark|
|00001f00| 65 72 5d 20 33 20 22 5c | 0a 49 6e 20 64 69 72 65 |er] 3 "\|.In dire|
|00001f10| 64 2c 20 66 6c 61 67 20 | 61 6c 6c 20 66 69 6c 65 |d, flag |all file|
|00001f20| 73 20 77 69 74 68 20 61 | 20 63 65 72 74 61 69 6e |s with a| certain|
|00001f30| 20 65 78 74 65 6e 73 69 | 6f 6e 20 66 6f 72 20 64 | extensi|on for d|
|00001f40| 65 6c 65 74 69 6f 6e 2e | 0a 41 20 60 2e 27 20 69 |eletion.|.A `.' i|
|00001f50| 73 20 2a 6e 6f 74 2a 20 | 61 75 74 6f 6d 61 74 69 |s *not* |automati|
|00001f60| 63 61 6c 6c 79 20 70 72 | 65 70 65 6e 64 65 64 20 |cally pr|epended |
|00001f70| 74 6f 20 74 68 65 20 73 | 74 72 69 6e 67 20 65 6e |to the s|tring en|
|00001f80| 74 65 72 65 64 2e 22 20 | 22 73 46 6c 61 67 67 69 |tered." |"sFlaggi|
|00001f90| 6e 67 20 65 78 74 65 6e | 73 69 6f 6e 3a 20 22 5d |ng exten|sion: "]|
|00001fa0| 29 0a 28 64 65 66 76 61 | 72 20 70 61 74 63 68 2d |).(defva|r patch-|
|00001fb0| 75 6e 63 6c 65 61 6e 2d | 65 78 74 65 6e 73 69 6f |unclean-|extensio|
|00001fc0| 6e 73 20 27 28 22 2e 72 | 65 6a 22 20 22 2e 6f 72 |ns '(".r|ej" ".or|
|00001fd0| 69 67 22 29 20 22 5c 0a | 4c 69 73 74 20 6f 66 20 |ig") "\.|List of |
|00001fe0| 65 78 74 65 6e 73 69 6f | 6e 73 20 6f 66 20 64 69 |extensio|ns of di|
|00001ff0| 73 70 65 6e 73 61 62 6c | 65 20 66 69 6c 65 73 20 |spensabl|e files |
|00002000| 63 72 65 61 74 65 64 20 | 62 79 20 74 68 65 20 60 |created |by the `|
|00002010| 70 61 74 63 68 27 20 70 | 72 6f 67 72 61 6d 2e 22 |patch' p|rogram."|
|00002020| 29 0a 28 64 65 66 76 61 | 72 20 74 65 78 2d 75 6e |).(defva|r tex-un|
|00002030| 63 6c 65 61 6e 2d 65 78 | 74 65 6e 73 69 6f 6e 73 |clean-ex|tensions|
|00002040| 20 27 28 22 2e 74 6f 63 | 22 20 22 2e 6c 6f 67 22 | '(".toc|" ".log"|
|00002050| 20 22 2e 61 75 78 22 29 | 20 22 5c 0a 4c 69 73 74 | ".aux")| "\.List|
|00002060| 20 6f 66 20 65 78 74 65 | 6e 73 69 6f 6e 73 20 6f | of exte|nsions o|
|00002070| 66 20 64 69 73 70 65 6e | 73 61 62 6c 65 20 66 69 |f dispen|sable fi|
|00002080| 6c 65 73 20 63 72 65 61 | 74 65 64 20 62 79 20 54 |les crea|ted by T|
|00002090| 65 58 2e 22 29 0a 28 64 | 65 66 76 61 72 20 6c 61 |eX.").(d|efvar la|
|000020a0| 74 65 78 2d 75 6e 63 6c | 65 61 6e 2d 65 78 74 65 |tex-uncl|ean-exte|
|000020b0| 6e 73 69 6f 6e 73 20 27 | 28 22 2e 69 64 78 22 20 |nsions '|(".idx" |
|000020c0| 22 2e 6c 6f 66 22 20 22 | 2e 6c 6f 74 22 20 22 2e |".lof" "|.lot" ".|
|000020d0| 67 6c 6f 22 29 20 22 5c | 0a 4c 69 73 74 20 6f 66 |glo") "\|.List of|
|000020e0| 20 65 78 74 65 6e 73 69 | 6f 6e 73 20 6f 66 20 64 | extensi|ons of d|
|000020f0| 69 73 70 65 6e 73 61 62 | 6c 65 20 66 69 6c 65 73 |ispensab|le files|
|00002100| 20 63 72 65 61 74 65 64 | 20 62 79 20 4c 61 54 65 | created| by LaTe|
|00002110| 58 2e 22 29 0a 28 64 65 | 66 76 61 72 20 62 69 62 |X.").(de|fvar bib|
|00002120| 74 65 78 2d 75 6e 63 6c | 65 61 6e 2d 65 78 74 65 |tex-uncl|ean-exte|
|00002130| 6e 73 69 6f 6e 73 20 27 | 28 22 2e 62 6c 67 22 20 |nsions '|(".blg" |
|00002140| 22 2e 62 62 6c 22 29 20 | 22 5c 0a 4c 69 73 74 20 |".bbl") |"\.List |
|00002150| 6f 66 20 65 78 74 65 6e | 73 69 6f 6e 73 20 6f 66 |of exten|sions of|
|00002160| 20 64 69 73 70 65 6e 73 | 61 62 6c 65 20 66 69 6c | dispens|able fil|
|00002170| 65 73 20 63 72 65 61 74 | 65 64 20 62 79 20 42 69 |es creat|ed by Bi|
|00002180| 62 54 65 58 2e 22 29 0a | 28 64 65 66 76 61 72 20 |bTeX.").|(defvar |
|00002190| 74 65 78 69 6e 66 6f 2d | 75 6e 63 6c 65 61 6e 2d |texinfo-|unclean-|
|000021a0| 65 78 74 65 6e 73 69 6f | 6e 73 20 27 28 22 2e 63 |extensio|ns '(".c|
|000021b0| 70 22 20 22 2e 63 70 73 | 22 20 22 2e 66 6e 22 20 |p" ".cps|" ".fn" |
|000021c0| 22 2e 66 6e 73 22 20 22 | 2e 6b 79 22 20 22 2e 6b |".fns" "|.ky" ".k|
|000021d0| 79 73 22 20 22 2e 70 67 | 22 20 22 2e 70 67 73 22 |ys" ".pg|" ".pgs"|
|000021e0| 20 22 2e 74 70 22 20 22 | 2e 74 70 73 22 20 22 2e | ".tp" "|.tps" ".|
|000021f0| 76 72 22 20 22 2e 76 72 | 73 22 29 20 22 5c 0a 4c |vr" ".vr|s") "\.L|
|00002200| 69 73 74 20 6f 66 20 65 | 78 74 65 6e 73 69 6f 6e |ist of e|xtension|
|00002210| 73 20 6f 66 20 64 69 73 | 70 65 6e 73 61 62 6c 65 |s of dis|pensable|
|00002220| 20 66 69 6c 65 73 20 63 | 72 65 61 74 65 64 20 62 | files c|reated b|
|00002230| 79 20 74 65 78 69 6e 66 | 6f 2e 22 29 0a 28 66 73 |y texinf|o.").(fs|
|00002240| 65 74 20 27 64 69 72 65 | 64 2d 63 6c 65 61 6e 2d |et 'dire|d-clean-|
|00002250| 70 61 74 63 68 20 23 5b | 6e 69 6c 20 22 c0 09 21 |patch #[|nil "..!|
|00002260| 87 22 20 5b 64 69 72 65 | 64 2d 66 6c 61 67 2d 65 |." [dire|d-flag-e|
|00002270| 78 74 65 6e 73 69 6f 6e | 20 70 61 74 63 68 2d 75 |xtension| patch-u|
|00002280| 6e 63 6c 65 61 6e 2d 65 | 78 74 65 6e 73 69 6f 6e |nclean-e|xtension|
|00002290| 73 5d 20 32 20 22 5c 0a | 46 6c 61 67 20 64 69 73 |s] 2 "\.|Flag dis|
|000022a0| 70 65 6e 73 61 62 6c 65 | 20 66 69 6c 65 73 20 63 |pensable| files c|
|000022b0| 72 65 61 74 65 64 20 62 | 79 20 70 61 74 63 68 20 |reated b|y patch |
|000022c0| 66 6f 72 20 64 65 6c 65 | 74 69 6f 6e 2e 0a 53 65 |for dele|tion..Se|
|000022d0| 65 20 76 61 72 69 61 62 | 6c 65 20 60 70 61 74 63 |e variab|le `patc|
|000022e0| 68 2d 75 6e 63 6c 65 61 | 6e 2d 65 78 74 65 6e 73 |h-unclea|n-extens|
|000022f0| 69 6f 6e 73 27 2e 22 20 | 6e 69 6c 5d 29 0a 28 66 |ions'." |nil]).(f|
|00002300| 73 65 74 20 27 64 69 72 | 65 64 2d 63 6c 65 61 6e |set 'dir|ed-clean|
|00002310| 2d 74 65 78 20 23 5b 6e | 69 6c 20 22 c0 c1 5c 6e |-tex #[n|il "..\n|
|00002320| 0b 0c 0d 24 21 87 22 20 | 5b 64 69 72 65 64 2d 66 |...$!." |[dired-f|
|00002330| 6c 61 67 2d 65 78 74 65 | 6e 73 69 6f 6e 20 61 70 |lag-exte|nsion ap|
|00002340| 70 65 6e 64 20 74 65 78 | 69 6e 66 6f 2d 75 6e 63 |pend tex|info-unc|
|00002350| 6c 65 61 6e 2d 65 78 74 | 65 6e 73 69 6f 6e 73 20 |lean-ext|ensions |
|00002360| 6c 61 74 65 78 2d 75 6e | 63 6c 65 61 6e 2d 65 78 |latex-un|clean-ex|
|00002370| 74 65 6e 73 69 6f 6e 73 | 20 62 69 62 74 65 78 2d |tensions| bibtex-|
|00002380| 75 6e 63 6c 65 61 6e 2d | 65 78 74 65 6e 73 69 6f |unclean-|extensio|
|00002390| 6e 73 20 74 65 78 2d 75 | 6e 63 6c 65 61 6e 2d 65 |ns tex-u|nclean-e|
|000023a0| 78 74 65 6e 73 69 6f 6e | 73 5d 20 36 20 22 5c 0a |xtension|s] 6 "\.|
|000023b0| 46 6c 61 67 20 64 69 73 | 70 65 6e 73 61 62 6c 65 |Flag dis|pensable|
|000023c0| 20 66 69 6c 65 73 20 63 | 72 65 61 74 65 64 20 62 | files c|reated b|
|000023d0| 79 20 74 65 78 20 65 74 | 63 2e 20 66 6f 72 20 64 |y tex et|c. for d|
|000023e0| 65 6c 65 74 69 6f 6e 2e | 0a 53 65 65 20 76 61 72 |eletion.|.See var|
|000023f0| 69 61 62 6c 65 20 60 74 | 65 78 69 6e 66 6f 2d 75 |iable `t|exinfo-u|
|00002400| 6e 63 6c 65 61 6e 2d 65 | 78 74 65 6e 73 69 6f 6e |nclean-e|xtension|
|00002410| 73 27 2c 20 60 6c 61 74 | 65 78 2d 75 6e 63 6c 65 |s', `lat|ex-uncle|
|00002420| 61 6e 2d 65 78 74 65 6e | 73 69 6f 6e 73 27 2c 0a |an-exten|sions',.|
|00002430| 60 62 69 62 74 65 78 2d | 75 6e 63 6c 65 61 6e 2d |`bibtex-|unclean-|
|00002440| 65 78 74 65 6e 73 69 6f | 6e 73 27 20 61 6e 64 20 |extensio|ns' and |
|00002450| 60 74 65 78 69 6e 66 6f | 2d 75 6e 63 6c 65 61 6e |`texinfo|-unclean|
|00002460| 2d 65 78 74 65 6e 73 69 | 6f 6e 73 27 2e 22 20 6e |-extensi|ons'." n|
|00002470| 69 6c 5d 29 0a 28 66 73 | 65 74 20 27 64 69 72 65 |il]).(fs|et 'dire|
|00002480| 64 2d 64 6f 2d 75 6e 6d | 61 72 6b 20 23 5b 28 75 |d-do-unm|ark #[(u|
|00002490| 6e 6d 61 72 6b 65 72 29 | 20 22 08 c1 98 ab 82 c2 |nmarker)| "......|
|000024a0| 10 08 c3 c4 4f 10 c5 20 | c6 1e 07 1e 08 8a 65 62 |....O.. |......eb|
|000024b0| 88 c9 0e 08 c6 ca 23 ad | 86 cb 08 21 88 aa 72 2b |......#.|...!..r+|
|000024c0| 87 22 20 5b 75 6e 6d 61 | 72 6b 65 72 20 22 22 20 |." [unma|rker "" |
|000024d0| 22 20 22 20 30 20 31 20 | 64 69 72 65 64 2d 6d 61 |" " 0 1 |dired-ma|
|000024e0| 72 6b 65 72 2d 72 65 67 | 65 78 70 20 6e 69 6c 20 |rker-reg|exp nil |
|000024f0| 62 75 66 66 65 72 2d 72 | 65 61 64 2d 6f 6e 6c 79 |buffer-r|ead-only|
|00002500| 20 72 65 67 65 78 70 20 | 72 65 2d 73 65 61 72 63 | regexp |re-searc|
|00002510| 68 2d 66 6f 72 77 61 72 | 64 20 74 20 72 65 70 6c |h-forwar|d t repl|
|00002520| 61 63 65 2d 6d 61 74 63 | 68 5d 20 34 20 22 5c 0a |ace-matc|h] 4 "\.|
|00002530| 55 6e 6d 61 72 6b 20 6d | 61 72 6b 65 64 20 66 69 |Unmark m|arked fi|
|00002540| 6c 65 73 20 62 79 20 72 | 65 70 6c 61 63 69 6e 67 |les by r|eplacing|
|00002550| 20 74 68 65 20 6d 61 72 | 6b 65 72 20 77 69 74 68 | the mar|ker with|
|00002560| 20 61 6e 6f 74 68 65 72 | 20 63 68 61 72 61 63 74 | another| charact|
|00002570| 65 72 2e 0a 54 68 65 20 | 6e 65 77 20 63 68 61 72 |er..The |new char|
|00002580| 61 63 74 65 72 20 64 65 | 66 61 75 6c 74 73 20 74 |acter de|faults t|
|00002590| 6f 20 61 20 73 70 61 63 | 65 2c 20 65 66 66 65 63 |o a spac|e, effec|
|000025a0| 74 69 76 65 6c 79 20 75 | 6e 6d 61 72 6b 69 6e 67 |tively u|nmarking|
|000025b0| 20 74 68 65 6d 2e 22 20 | 22 73 43 68 61 6e 67 65 | them." |"sChange|
|000025c0| 20 6d 61 72 6b 65 72 20 | 74 6f 3a 20 22 5d 29 0a | marker |to: "]).|
|000025d0| 28 66 73 65 74 20 27 64 | 69 72 65 64 2d 6a 75 6d |(fset 'd|ired-jum|
|000025e0| 70 2d 62 61 63 6b 20 23 | 5b 28 26 6f 70 74 69 6f |p-back #|[(&optio|
|000025f0| 6e 61 6c 20 6f 74 68 65 | 72 2d 77 69 6e 64 6f 77 |nal othe|r-window|
|00002600| 29 20 22 08 89 19 ab 85 | c2 09 21 aa 81 0b 1c 0d |) ".....|..!.....|
|00002610| c6 3d ab 94 c7 20 14 0e | 08 ab 85 c9 20 88 aa 83 |.=... ..|.... ...|
|00002620| ca 20 88 cb 0c 21 aa 94 | 0e 08 ab 86 cc 0c 21 88 |. ...!..|......!.|
|00002630| aa 84 cd 0c 21 88 09 ad | 83 cb 09 21 2a 87 22 20 |....!...|...!*." |
|00002640| 5b 62 75 66 66 65 72 2d | 66 69 6c 65 2d 6e 61 6d |[buffer-|file-nam|
|00002650| 65 20 66 69 6c 65 20 66 | 69 6c 65 2d 6e 61 6d 65 |e file f|ile-name|
|00002660| 2d 64 69 72 65 63 74 6f | 72 79 20 64 65 66 61 75 |-directo|ry defau|
|00002670| 6c 74 2d 64 69 72 65 63 | 74 6f 72 79 20 64 69 72 |lt-direc|tory dir|
|00002680| 20 6d 61 6a 6f 72 2d 6d | 6f 64 65 20 64 69 72 65 | major-m|ode dire|
|00002690| 64 2d 6d 6f 64 65 20 64 | 69 72 65 64 2d 63 75 72 |d-mode d|ired-cur|
|000026a0| 72 65 6e 74 2d 64 69 72 | 65 63 74 6f 72 79 20 6f |rent-dir|ectory o|
|000026b0| 74 68 65 72 2d 77 69 6e | 64 6f 77 20 64 69 72 65 |ther-win|dow dire|
|000026c0| 64 2d 75 70 2d 64 69 72 | 65 63 74 6f 72 79 2d 6f |d-up-dir|ectory-o|
|000026d0| 74 68 65 72 2d 77 69 6e | 64 6f 77 20 64 69 72 65 |ther-win|dow dire|
|000026e0| 64 2d 75 70 2d 64 69 72 | 65 63 74 6f 72 79 20 64 |d-up-dir|ectory d|
|000026f0| 69 72 65 64 2d 72 65 61 | 6c 6c 79 2d 67 6f 74 6f |ired-rea|lly-goto|
|00002700| 2d 66 69 6c 65 20 64 69 | 72 65 64 2d 6f 74 68 65 |-file di|red-othe|
|00002710| 72 2d 77 69 6e 64 6f 77 | 20 64 69 72 65 64 5d 20 |r-window| dired] |
|00002720| 33 20 22 5c 0a 4a 75 6d | 70 20 62 61 63 6b 20 74 |3 "\.Jum|p back t|
|00002730| 6f 20 64 69 72 65 64 3a | 0a 49 66 20 69 6e 20 61 |o dired:|.If in a|
|00002740| 20 66 69 6c 65 2c 20 64 | 69 72 65 64 20 74 68 65 | file, d|ired the|
|00002750| 20 63 75 72 72 65 6e 74 | 20 64 69 72 65 63 74 6f | current| directo|
|00002760| 72 79 20 61 6e 64 20 6d | 6f 76 65 20 74 6f 20 66 |ry and m|ove to f|
|00002770| 69 6c 65 27 73 20 6c 69 | 6e 65 2e 0a 49 66 20 69 |ile's li|ne..If i|
|00002780| 6e 20 64 69 72 65 64 20 | 61 6c 72 65 61 64 79 2c |n dired |already,|
|00002790| 20 70 6f 70 20 75 70 20 | 61 20 6c 65 76 65 6c 20 | pop up |a level |
|000027a0| 61 6e 64 20 67 6f 74 6f | 20 6f 6c 64 20 64 69 72 |and goto| old dir|
|000027b0| 65 63 74 6f 72 79 27 73 | 20 6c 69 6e 65 2e 0a 49 |ectory's| line..I|
|000027c0| 6e 20 63 61 73 65 20 74 | 68 65 20 70 72 6f 70 65 |n case t|he prope|
|000027d0| 72 20 64 69 72 65 64 20 | 66 69 6c 65 20 6c 69 6e |r dired |file lin|
|000027e0| 65 20 63 61 6e 6e 6f 74 | 20 62 65 20 66 6f 75 6e |e cannot| be foun|
|000027f0| 64 2c 20 72 65 66 72 65 | 73 68 20 74 68 65 20 64 |d, refre|sh the d|
|00002800| 69 72 65 64 0a 20 20 62 | 75 66 66 65 72 20 61 6e |ired. b|uffer an|
|00002810| 64 20 74 72 79 20 61 67 | 61 69 6e 2e 22 20 6e 69 |d try ag|ain." ni|
|00002820| 6c 5d 29 0a 28 66 73 65 | 74 20 27 64 69 72 65 64 |l]).(fse|t 'dired|
|00002830| 2d 6a 75 6d 70 2d 62 61 | 63 6b 2d 6f 74 68 65 72 |-jump-ba|ck-other|
|00002840| 2d 77 69 6e 64 6f 77 20 | 23 5b 6e 69 6c 20 22 c0 |-window |#[nil ".|
|00002850| c1 21 87 22 20 5b 64 69 | 72 65 64 2d 6a 75 6d 70 |.!." [di|red-jump|
|00002860| 2d 62 61 63 6b 20 74 5d | 20 32 20 22 5c 0a 4c 69 |-back t]| 2 "\.Li|
|00002870| 6b 65 20 5c 5c 5b 64 69 | 72 65 64 2d 6a 75 6d 70 |ke \\[di|red-jump|
|00002880| 2d 62 61 63 6b 5d 2c 20 | 62 75 74 20 74 6f 20 6f |-back], |but to o|
|00002890| 74 68 65 72 20 77 69 6e | 64 6f 77 2e 22 20 6e 69 |ther win|dow." ni|
|000028a0| 6c 5d 29 0a 28 66 73 65 | 74 20 27 64 69 72 65 64 |l]).(fse|t 'dired|
|000028b0| 2d 72 65 61 6c 6c 79 2d | 67 6f 74 6f 2d 66 69 6c |-really-|goto-fil|
|000028c0| 65 20 23 5b 28 66 69 6c | 65 29 20 22 c0 09 21 ae |e #[(fil|e) "..!.|
|000028d0| 89 c2 c3 09 21 21 88 c0 | 09 21 87 22 20 5b 64 69 |....!!..|.!." [di|
|000028e0| 72 65 64 2d 67 6f 74 6f | 2d 66 69 6c 65 20 66 69 |red-goto|-file fi|
|000028f0| 6c 65 20 64 69 72 65 64 | 2d 69 6e 73 65 72 74 2d |le dired|-insert-|
|00002900| 73 75 62 64 69 72 20 66 | 69 6c 65 2d 6e 61 6d 65 |subdir f|ile-name|
|00002910| 2d 64 69 72 65 63 74 6f | 72 79 5d 20 33 5d 29 0a |-directo|ry] 3]).|
|00002920| 28 66 73 65 74 20 27 64 | 69 72 65 64 2d 75 70 2d |(fset 'd|ired-up-|
|00002930| 64 69 72 65 63 74 6f 72 | 79 2d 6f 74 68 65 72 2d |director|y-other-|
|00002940| 77 69 6e 64 6f 77 20 23 | 5b 6e 69 6c 20 22 c0 20 |window #|[nil ". |
|00002950| 19 c2 c3 09 21 21 1c c5 | c3 09 21 21 ae 8c c6 0c |....!!..|..!!....|
|00002960| 21 ae 87 c7 0c 21 88 c5 | 09 21 2a 87 22 20 5b 64 |!....!..|.!*." [d|
|00002970| 69 72 65 64 2d 63 75 72 | 72 65 6e 74 2d 64 69 72 |ired-cur|rent-dir|
|00002980| 65 63 74 6f 72 79 20 64 | 69 72 20 66 69 6c 65 2d |ectory d|ir file-|
|00002990| 6e 61 6d 65 2d 64 69 72 | 65 63 74 6f 72 79 20 64 |name-dir|ectory d|
|000029a0| 69 72 65 63 74 6f 72 79 | 2d 66 69 6c 65 2d 6e 61 |irectory|-file-na|
|000029b0| 6d 65 20 75 70 20 64 69 | 72 65 64 2d 67 6f 74 6f |me up di|red-goto|
|000029c0| 2d 66 69 6c 65 20 64 69 | 72 65 64 2d 67 6f 74 6f |-file di|red-goto|
|000029d0| 2d 73 75 62 64 69 72 20 | 64 69 72 65 64 2d 6f 74 |-subdir |dired-ot|
|000029e0| 68 65 72 2d 77 69 6e 64 | 6f 77 5d 20 33 20 22 5c |her-wind|ow] 3 "\|
|000029f0| 0a 4c 69 6b 65 20 60 64 | 69 72 65 64 2d 75 70 2d |.Like `d|ired-up-|
|00002a00| 64 69 72 65 63 74 6f 72 | 79 27 2c 20 62 75 74 20 |director|y', but |
|00002a10| 69 6e 20 6f 74 68 65 72 | 20 77 69 6e 64 6f 77 2e |in other| window.|
|00002a20| 22 20 6e 69 6c 5d 29 0a | 28 66 73 65 74 20 27 64 |" nil]).|(fset 'd|
|00002a30| 69 72 65 64 2d 6d 61 72 | 6b 2d 72 63 73 2d 66 69 |ired-mar|k-rcs-fi|
|00002a40| 6c 65 73 20 23 5b 28 26 | 6f 70 74 69 6f 6e 61 6c |les #[(&|optional|
|00002a50| 20 75 6e 66 6c 61 67 2d | 70 29 20 22 c0 c1 5c 6e | unflag-|p) "..\n|
|00002a60| ab 83 c3 aa 81 c4 5c 22 | 88 5c 6e ab 83 c5 aa 82 |......\"|.\n.....|
|00002a70| 0e 06 c7 89 89 89 89 1e | 08 1e 09 1e 5c 6e 1e 0b |........|....\n..|
|00002a80| 1e 0c 1e 06 cd ce cd cf | 0e 10 5c 22 5c 22 88 0e |........|..\"\"..|
|00002a90| 0c 47 16 08 0e 0c ab a4 | 0e 0c 40 d1 d2 4f 16 0b |.G......|..@..O..|
|00002aa0| 0e 0c 41 16 0c 8a d3 0e | 0b 21 ab 86 d4 d5 21 88 |..A.....|.!....!.|
|00002ab0| aa 87 0e 0b 0e 5c 6e 42 | 16 5c 6e 29 aa 58 0e 5c |.....\nB|.\n).X.\|
|00002ac0| 6e ac 93 c0 d6 0e 08 d7 | 0e 08 21 5c 6e ab 83 d8 |n.......|..!\n...|
|00002ad0| aa 81 d9 24 88 aa a6 0e | 5c 6e 47 16 09 da db 0e |...$....|\nG.....|
|00002ae0| 5c 6e 5c 22 88 c0 dc 0e | 08 d7 0e 08 21 0e 08 0e |\n\"....|....!...|
|00002af0| 09 5a 5c 6e ab 83 d8 aa | 81 d9 0e 09 0e 5c 6e 26 |.Z\n....|.....\n&|
|00002b00| 07 88 0e 5c 6e 2e 06 87 | 22 20 5b 6d 65 73 73 61 |...\n...|" [messa|
|00002b10| 67 65 20 22 25 73 61 72 | 6b 69 6e 67 20 52 43 53 |ge "%sar|king RCS|
|00002b20| 20 63 6f 6e 74 72 6f 6c | 6c 65 64 20 66 69 6c 65 | control|led file|
|00002b30| 73 2e 2e 2e 22 20 75 6e | 66 6c 61 67 2d 70 20 22 |s..." un|flag-p "|
|00002b40| 55 6e 6d 22 20 22 4d 22 | 20 33 32 20 64 69 72 65 |Unm" "M"| 32 dire|
|00002b50| 64 2d 6d 61 72 6b 65 72 | 2d 63 68 61 72 20 6e 69 |d-marker|-char ni|
|00002b60| 6c 20 74 6f 74 61 6c 20 | 63 6f 75 6e 74 20 66 61 |l total |count fa|
|00002b70| 69 6c 75 72 65 73 20 77 | 66 20 72 63 73 2d 66 69 |ilures w|f rcs-fi|
|00002b80| 6c 65 73 20 6d 61 70 63 | 61 72 20 23 5b 28 64 69 |les mapc|ar #[(di|
|00002b90| 72 29 20 22 c0 c1 5c 6e | 21 21 c3 9a ae a4 c4 c5 |r) "..\n|!!......|
|00002ba0| 5c 6e c6 c7 23 c8 c3 5c | 6e 5c 22 1e 09 ca 0e 09 |\n..#..\|n\".....|
|00002bb0| 21 ad 8b cb cc c5 cd 0e | 09 21 ce c7 23 5c 22 29 |!.......|.!..#\")|
|00002bc0| 0e 0f 23 89 16 0f 87 22 | 20 5b 66 69 6c 65 2d 6e |..#...."| [file-n|
|00002bd0| 61 6d 65 2d 6e 6f 6e 64 | 69 72 65 63 74 6f 72 79 |ame-nond|irectory|
|00002be0| 20 64 69 72 65 63 74 6f | 72 79 2d 66 69 6c 65 2d | directo|ry-file-|
|00002bf0| 6e 61 6d 65 20 64 69 72 | 20 22 52 43 53 22 20 61 |name dir| "RCS" a|
|00002c00| 70 70 65 6e 64 20 64 69 | 72 65 63 74 6f 72 79 2d |ppend di|rectory-|
|00002c10| 66 69 6c 65 73 20 74 20 | 22 2c 76 24 22 20 65 78 |files t |",v$" ex|
|00002c20| 70 61 6e 64 2d 66 69 6c | 65 2d 6e 61 6d 65 20 72 |pand-fil|e-name r|
|00002c30| 63 73 2d 64 69 72 20 66 | 69 6c 65 2d 64 69 72 65 |cs-dir f|ile-dire|
|00002c40| 63 74 6f 72 79 2d 70 20 | 6d 61 70 63 61 72 20 23 |ctory-p |mapcar #|
|00002c50| 5b 28 78 29 20 22 c0 09 | 5c 6e 5c 22 87 22 20 5b |[(x) "..|\n\"." [|
|00002c60| 65 78 70 61 6e 64 2d 66 | 69 6c 65 2d 6e 61 6d 65 |expand-f|ile-name|
|00002c70| 20 78 20 64 69 72 5d 20 | 33 5d 20 66 69 6c 65 2d | x dir] |3] file-|
|00002c80| 6e 61 6d 65 2d 61 73 2d | 64 69 72 65 63 74 6f 72 |name-as-|director|
|00002c90| 79 20 6e 69 6c 20 72 63 | 73 2d 66 69 6c 65 73 5d |y nil rc|s-files]|
|00002ca0| 20 38 5d 20 63 61 72 20 | 64 69 72 65 64 2d 73 75 | 8] car |dired-su|
|00002cb0| 62 64 69 72 2d 61 6c 69 | 73 74 20 30 20 2d 32 20 |bdir-ali|st 0 -2 |
|00002cc0| 64 69 72 65 64 2d 67 6f | 74 6f 2d 66 69 6c 65 20 |dired-go|to-file |
|00002cd0| 64 69 72 65 64 2d 6d 61 | 72 6b 2d 66 69 6c 65 20 |dired-ma|rk-file |
|00002ce0| 31 20 22 25 64 20 52 43 | 53 20 66 69 6c 65 25 73 |1 "%d RC|S file%s|
|00002cf0| 20 25 73 6d 61 72 6b 65 | 64 2e 22 20 64 69 72 65 | %smarke|d." dire|
|00002d00| 64 2d 70 6c 75 72 61 6c | 2d 73 20 22 75 6e 22 20 |d-plural|-s "un" |
|00002d10| 22 22 20 64 69 72 65 64 | 2d 6c 6f 67 2d 73 75 6d |"" dired|-log-sum|
|00002d20| 6d 61 72 79 20 22 52 43 | 53 20 77 6f 72 6b 69 6e |mary "RC|S workin|
|00002d30| 67 20 66 69 6c 65 20 6e | 6f 74 20 66 6f 75 6e 64 |g file n|ot found|
|00002d40| 20 25 73 22 20 22 25 64 | 20 52 43 53 20 66 69 6c | %s" "%d| RCS fil|
|00002d50| 65 25 73 3a 20 25 64 20 | 25 73 6d 61 72 6b 65 64 |e%s: %d |%smarked|
|00002d60| 20 2d 20 25 64 20 6e 6f | 74 20 66 6f 75 6e 64 20 | - %d no|t found |
|00002d70| 25 73 2e 22 5d 20 38 20 | 22 5c 0a 4d 61 72 6b 20 |%s."] 8 |"\.Mark |
|00002d80| 61 6c 6c 20 66 69 6c 65 | 73 20 74 68 61 74 20 61 |all file|s that a|
|00002d90| 72 65 20 75 6e 64 65 72 | 20 52 43 53 20 63 6f 6e |re under| RCS con|
|00002da0| 74 72 6f 6c 2e 0a 57 69 | 74 68 20 70 72 65 66 69 |trol..Wi|th prefi|
|00002db0| 78 20 61 72 67 75 6d 65 | 6e 74 2c 20 75 6e 66 6c |x argume|nt, unfl|
|00002dc0| 61 67 20 61 6c 6c 20 74 | 68 6f 73 65 20 66 69 6c |ag all t|hose fil|
|00002dd0| 65 73 2e 0a 4d 65 6e 74 | 69 6f 6e 73 20 52 43 53 |es..Ment|ions RCS|
|00002de0| 20 66 69 6c 65 73 20 66 | 6f 72 20 77 68 69 63 68 | files f|or which|
|00002df0| 20 61 20 77 6f 72 6b 69 | 6e 67 20 66 69 6c 65 20 | a worki|ng file |
|00002e00| 77 61 73 20 6e 6f 74 20 | 66 6f 75 6e 64 20 69 6e |was not |found in|
|00002e10| 20 74 68 69 73 20 62 75 | 66 66 65 72 2e 0a 54 79 | this bu|ffer..Ty|
|00002e20| 70 65 20 5c 5c 5b 64 69 | 72 65 64 2d 77 68 79 5d |pe \\[di|red-why]|
|00002e30| 20 74 6f 20 73 65 65 20 | 74 68 65 6d 20 61 67 61 | to see |them aga|
|00002e40| 69 6e 2e 22 20 22 50 22 | 5d 29 0a 28 66 73 65 74 |in." "P"|]).(fset|
|00002e50| 20 27 64 69 72 65 64 2d | 64 6f 2d 74 6f 67 67 6c | 'dired-|do-toggl|
|00002e60| 65 20 23 5b 6e 69 6c 20 | 22 8a 65 62 88 c0 19 6d |e #[nil |".eb...m|
|00002e70| 3f ad a4 c2 20 ac 9b c3 | 0c 21 ac 96 c5 c6 60 60 |?... ...|.!....``|
|00002e80| 54 67 c7 3d ab 86 c7 0e | 08 44 aa 84 0e 08 c7 44 |Tg.=....|.D.....D|
|00002e90| 24 88 c9 79 88 aa 58 2a | 87 22 20 5b 6e 69 6c 20 |$..y..X*|." [nil |
|00002ea0| 62 75 66 66 65 72 2d 72 | 65 61 64 2d 6f 6e 6c 79 |buffer-r|ead-only|
|00002eb0| 20 64 69 72 65 64 2d 62 | 65 74 77 65 65 6e 2d 66 | dired-b|etween-f|
|00002ec0| 69 6c 65 73 20 6c 6f 6f | 6b 69 6e 67 2d 61 74 20 |iles loo|king-at |
|00002ed0| 64 69 72 65 64 2d 72 65 | 2d 64 6f 74 20 61 70 70 |dired-re|-dot app|
|00002ee0| 6c 79 20 73 75 62 73 74 | 2d 63 68 61 72 2d 69 6e |ly subst|-char-in|
|00002ef0| 2d 72 65 67 69 6f 6e 20 | 33 32 20 64 69 72 65 64 |-region |32 dired|
|00002f00| 2d 6d 61 72 6b 65 72 2d | 63 68 61 72 20 31 5d 20 |-marker-|char 1] |
|00002f10| 36 20 22 5c 0a 54 6f 67 | 67 6c 65 20 6d 61 72 6b |6 "\.Tog|gle mark|
|00002f20| 73 2e 0a 54 68 61 74 20 | 69 73 2c 20 63 75 72 72 |s..That |is, curr|
|00002f30| 65 6e 74 6c 79 20 6d 61 | 72 6b 65 64 20 66 69 6c |ently ma|rked fil|
|00002f40| 65 73 20 62 65 63 6f 6d | 65 20 75 6e 6d 61 72 6b |es becom|e unmark|
|00002f50| 65 64 20 61 6e 64 20 76 | 69 63 65 20 76 65 72 73 |ed and v|ice vers|
|00002f60| 61 2e 0a 46 69 6c 65 73 | 20 6d 61 72 6b 65 64 20 |a..Files| marked |
|00002f70| 77 69 74 68 20 6f 74 68 | 65 72 20 66 6c 61 67 73 |with oth|er flags|
|00002f80| 20 28 73 75 63 68 20 61 | 73 20 60 44 27 29 20 61 | (such a|s `D') a|
|00002f90| 72 65 20 6e 6f 74 20 61 | 66 66 65 63 74 65 64 2e |re not a|ffected.|
|00002fa0| 0a 60 2e 27 20 61 6e 64 | 20 60 2e 2e 27 20 61 72 |.`.' and| `..' ar|
|00002fb0| 65 20 6e 65 76 65 72 20 | 74 6f 67 67 6c 65 64 2e |e never |toggled.|
|00002fc0| 0a 41 73 20 61 6c 77 61 | 79 73 2c 20 68 69 64 64 |.As alwa|ys, hidd|
|00002fd0| 65 6e 20 73 75 62 64 69 | 72 73 20 61 72 65 20 6e |en subdi|rs are n|
|00002fe0| 6f 74 20 61 66 66 65 63 | 74 65 64 2e 22 20 6e 69 |ot affec|ted." ni|
|00002ff0| 6c 5d 29 0a 28 66 73 65 | 74 20 27 63 6f 70 79 2d |l]).(fse|t 'copy-|
|00003000| 73 74 72 69 6e 67 2d 61 | 73 2d 6b 69 6c 6c 20 23 |string-a|s-kill #|
|00003010| 5b 28 73 74 72 69 6e 67 | 29 20 22 08 09 42 89 11 |[(string|) "..B..|
|00003020| 47 5c 6e 56 ab 87 5c 6e | 53 09 9b c3 a1 88 09 89 |G\nV..\n|S.......|
|00003030| 14 87 22 20 5b 73 74 72 | 69 6e 67 20 6b 69 6c 6c |.." [str|ing kill|
|00003040| 2d 72 69 6e 67 20 6b 69 | 6c 6c 2d 72 69 6e 67 2d |-ring ki|ll-ring-|
|00003050| 6d 61 78 20 6e 69 6c 20 | 6b 69 6c 6c 2d 72 69 6e |max nil |kill-rin|
|00003060| 67 2d 79 61 6e 6b 2d 70 | 6f 69 6e 74 65 72 5d 20 |g-yank-p|ointer] |
|00003070| 33 20 22 5c 0a 53 61 76 | 65 20 53 54 52 49 4e 47 |3 "\.Sav|e STRING|
|00003080| 20 61 73 20 69 66 20 6b | 69 6c 6c 65 64 20 69 6e | as if k|illed in|
|00003090| 20 61 20 62 75 66 66 65 | 72 2e 22 5d 29 0a 28 64 | a buffe|r."]).(d|
|000030a0| 65 66 76 61 72 20 64 69 | 72 65 64 2d 6d 61 72 6b |efvar di|red-mark|
|000030b0| 65 64 2d 66 69 6c 65 73 | 20 6e 69 6c 20 22 5c 0a |ed-files| nil "\.|
|000030c0| 4c 69 73 74 20 6f 66 20 | 66 69 6c 65 6e 61 6d 65 |List of |filename|
|000030d0| 73 20 66 72 6f 6d 20 6c | 61 73 74 20 60 64 69 72 |s from l|ast `dir|
|000030e0| 65 64 2d 63 6f 70 79 2d | 66 69 6c 65 6e 61 6d 65 |ed-copy-|filename|
|000030f0| 2d 61 73 2d 6b 69 6c 6c | 27 20 63 61 6c 6c 2e 22 |-as-kill|' call."|
|00003100| 29 0a 28 66 73 65 74 20 | 27 64 69 72 65 64 2d 63 |).(fset |'dired-c|
|00003110| 6f 70 79 2d 66 69 6c 65 | 6e 61 6d 65 2d 61 73 2d |opy-file|name-as-|
|00003120| 6b 69 6c 6c 20 23 5b 28 | 26 6f 70 74 69 6f 6e 61 |kill #[(|&optiona|
|00003130| 6c 20 61 72 67 29 20 22 | c0 09 ac 84 c2 20 ae a7 |l arg) "|..... ..|
|00003140| c3 c4 09 ab 9a c5 09 21 | c6 55 ab 84 c7 20 aa 92 |.......!|.U... ..|
|00003150| 09 a8 ab 86 c7 c8 09 5c | 22 aa 88 c7 c9 21 aa 83 |.......\|"....!..|
|00003160| c7 c8 21 89 16 5c 6e cb | 23 21 88 cc cd 0e 0e 40 |..!..\n.|#!.....@|
|00003170| 5c 22 87 22 20 5b 63 6f | 70 79 2d 73 74 72 69 6e |\"." [co|py-strin|
|00003180| 67 2d 61 73 2d 6b 69 6c | 6c 20 61 72 67 20 64 69 |g-as-kil|l arg di|
|00003190| 72 65 64 2d 67 65 74 2d | 73 75 62 64 69 72 20 6d |red-get-|subdir m|
|000031a0| 61 70 63 6f 6e 63 61 74 | 20 69 64 65 6e 74 69 74 |apconcat| identit|
|000031b0| 79 20 70 72 65 66 69 78 | 2d 6e 75 6d 65 72 69 63 |y prefix|-numeric|
|000031c0| 2d 76 61 6c 75 65 20 30 | 20 64 69 72 65 64 2d 6d |-value 0| dired-m|
|000031d0| 61 72 6b 2d 67 65 74 2d | 66 69 6c 65 73 20 6e 6f |ark-get-|files no|
|000031e0| 2d 64 69 72 20 74 20 64 | 69 72 65 64 2d 6d 61 72 |-dir t d|ired-mar|
|000031f0| 6b 65 64 2d 66 69 6c 65 | 73 20 22 20 22 20 6d 65 |ked-file|s " " me|
|00003200| 73 73 61 67 65 20 22 25 | 73 22 20 6b 69 6c 6c 2d |ssage "%|s" kill-|
|00003210| 72 69 6e 67 5d 20 36 20 | 22 5c 0a 43 6f 70 79 20 |ring] 6 |"\.Copy |
|00003220| 6e 61 6d 65 73 20 6f 66 | 20 6d 61 72 6b 65 64 20 |names of| marked |
|00003230| 28 6f 72 20 6e 65 78 74 | 20 41 52 47 29 20 66 69 |(or next| ARG) fi|
|00003240| 6c 65 73 20 69 6e 74 6f | 20 74 68 65 20 6b 69 6c |les into| the kil|
|00003250| 6c 20 72 69 6e 67 2e 0a | 54 68 65 20 6e 61 6d 65 |l ring..|The name|
|00003260| 73 20 61 72 65 20 73 65 | 70 61 72 61 74 65 64 20 |s are se|parated |
|00003270| 62 79 20 61 20 73 70 61 | 63 65 2e 0a 57 69 74 68 |by a spa|ce..With|
|00003280| 20 61 20 7a 65 72 6f 20 | 70 72 65 66 69 78 20 61 | a zero |prefix a|
|00003290| 72 67 2c 20 75 73 65 20 | 74 68 65 20 63 6f 6d 70 |rg, use |the comp|
|000032a0| 6c 65 74 65 20 70 61 74 | 68 6e 61 6d 65 20 6f 66 |lete pat|hname of|
|000032b0| 20 65 61 63 68 20 6d 61 | 72 6b 65 64 20 66 69 6c | each ma|rked fil|
|000032c0| 65 2e 0a 57 69 74 68 20 | 61 20 72 61 77 20 28 6a |e..With |a raw (j|
|000032d0| 75 73 74 20 5c 5c 5b 75 | 6e 69 76 65 72 73 61 6c |ust \\[u|niversal|
|000032e0| 2d 61 72 67 75 6d 65 6e | 74 5d 29 20 70 72 65 66 |-argumen|t]) pref|
|000032f0| 69 78 20 61 72 67 2c 20 | 75 73 65 20 74 68 65 20 |ix arg, |use the |
|00003300| 72 65 6c 61 74 69 76 65 | 20 70 61 74 68 6e 61 6d |relative| pathnam|
|00003310| 65 20 6f 66 20 65 61 63 | 68 20 6d 61 72 6b 65 64 |e of eac|h marked|
|00003320| 20 66 69 6c 65 2e 0a 0a | 49 66 20 6f 6e 20 61 20 | file...|If on a |
|00003330| 73 75 62 64 69 72 20 68 | 65 61 64 65 72 6c 69 6e |subdir h|eaderlin|
|00003340| 65 20 61 6e 64 20 6e 6f | 20 70 72 65 66 69 78 20 |e and no| prefix |
|00003350| 61 72 67 20 67 69 76 65 | 6e 2c 20 75 73 65 20 73 |arg give|n, use s|
|00003360| 75 62 64 69 72 6e 61 6d | 65 20 69 6e 73 74 65 61 |ubdirnam|e instea|
|00003370| 64 2e 0a 0a 59 6f 75 20 | 63 61 6e 20 74 68 65 6e |d...You |can then|
|00003380| 20 66 65 65 64 20 74 68 | 65 20 66 69 6c 65 20 6e | feed th|e file n|
|00003390| 61 6d 65 20 74 6f 20 6f | 74 68 65 72 20 63 6f 6d |ame to o|ther com|
|000033a0| 6d 61 6e 64 73 20 77 69 | 74 68 20 5c 5c 5b 79 61 |mands wi|th \\[ya|
|000033b0| 6e 6b 5d 2e 0a 0a 54 68 | 65 20 6c 69 73 74 20 6f |nk]...Th|e list o|
|000033c0| 66 20 6e 61 6d 65 73 20 | 69 73 20 61 6c 73 6f 20 |f names |is also |
|000033d0| 73 74 6f 72 65 64 20 6f | 6e 74 6f 20 74 68 65 20 |stored o|nto the |
|000033e0| 76 61 72 69 61 62 6c 65 | 0a 60 64 69 72 65 64 2d |variable|.`dired-|
|000033f0| 6d 61 72 6b 65 64 2d 66 | 69 6c 65 73 27 20 66 6f |marked-f|iles' fo|
|00003400| 72 20 75 73 65 2c 20 65 | 2e 67 2e 2c 20 69 6e 20 |r use, e|.g., in |
|00003410| 61 6e 20 60 5c 5c 5b 65 | 76 61 6c 2d 65 78 70 72 |an `\\[e|val-expr|
|00003420| 65 73 73 69 6f 6e 5d 27 | 20 63 6f 6d 6d 61 6e 64 |ession]'| command|
|00003430| 2e 22 20 22 50 22 5d 29 | 0a 28 66 73 65 74 20 27 |." "P"])|.(fset '|
|00003440| 64 69 72 65 64 2d 64 6f | 2d 62 61 63 6b 67 72 6f |dired-do|-backgro|
|00003450| 75 6e 64 2d 73 68 65 6c | 6c 2d 63 6f 6d 6d 61 6e |und-shel|l-comman|
|00003460| 64 20 23 5b 28 26 6f 70 | 74 69 6f 6e 61 6c 20 61 |d #[(&op|tional a|
|00003470| 72 67 29 20 22 c0 09 c2 | 5c 22 87 22 20 5b 64 69 |rg) "...|\"." [di|
|00003480| 72 65 64 2d 64 6f 2d 73 | 68 65 6c 6c 2d 63 6f 6d |red-do-s|hell-com|
|00003490| 6d 61 6e 64 20 61 72 67 | 20 74 5d 20 33 20 22 5c |mand arg| t] 3 "\|
|000034a0| 0a 4c 69 6b 65 20 5c 5c | 5b 64 69 72 65 64 2d 64 |.Like \\|[dired-d|
|000034b0| 6f 2d 73 68 65 6c 6c 2d | 63 6f 6d 6d 61 6e 64 5d |o-shell-|command]|
|000034c0| 2c 20 62 75 74 20 73 74 | 61 72 74 73 20 63 6f 6d |, but st|arts com|
|000034d0| 6d 61 6e 64 20 69 6e 20 | 62 61 63 6b 67 72 6f 75 |mand in |backgrou|
|000034e0| 6e 64 2e 0a 4e 6f 74 65 | 20 74 68 61 74 20 79 6f |nd..Note| that yo|
|000034f0| 75 20 63 61 6e 20 74 79 | 70 65 20 69 6e 70 75 74 |u can ty|pe input|
|00003500| 20 74 6f 20 74 68 65 20 | 63 6f 6d 6d 61 6e 64 20 | to the |command |
|00003510| 69 6e 20 69 74 73 20 62 | 75 66 66 65 72 2e 0a 54 |in its b|uffer..T|
|00003520| 68 69 73 20 72 65 71 75 | 69 72 65 73 20 62 61 63 |his requ|ires bac|
|00003530| 6b 67 72 6f 75 6e 64 2e | 65 6c 20 66 72 6f 6d 20 |kground.|el from |
|00003540| 74 68 65 20 63 6f 6d 69 | 6e 74 20 70 61 63 6b 61 |the comi|nt packa|
|00003550| 67 65 20 74 6f 20 77 6f | 72 6b 2e 22 20 22 50 22 |ge to wo|rk." "P"|
|00003560| 5d 29 0a 28 62 79 74 65 | 2d 63 6f 64 65 20 22 c0 |]).(byte|-code ".|
|00003570| c1 4d 88 c2 c3 c4 21 ac | 82 c5 14 c6 c4 c7 c8 23 |.M....!.|.......#|
|00003580| 88 c4 21 87 22 20 5b 64 | 69 72 65 64 2d 63 6c 65 |..!." [d|ired-cle|
|00003590| 61 6e 2d 75 70 2d 61 66 | 74 65 72 2d 64 65 6c 65 |an-up-af|ter-dele|
|000035a0| 74 69 6f 6e 20 23 5b 28 | 66 6e 29 20 22 8a c0 09 |tion #[(|fn) "...|
|000035b0| 21 ab 83 c2 20 88 29 c3 | 09 21 89 1c ab 90 c5 c6 |!... .).|.!......|
|000035c0| c7 c8 09 21 5c 22 21 ab | 86 8a c9 0c 21 88 29 29 |...!\"!.|....!.))|
|000035d0| ca 09 21 cb 1c 89 1e 0c | ad a4 c5 c6 cd ce 0e 0c |..!.....|........|
|000035e0| 47 21 c8 09 21 23 21 ad | 95 0e 0c ad 91 8a c9 0e |G!..!#!.|........|
|000035f0| 0c 40 21 88 29 0e 0c 41 | 89 16 0c ac 70 cb 2a 87 |.@!.)..A|....p.*.|
|00003600| 22 20 5b 64 69 72 65 64 | 2d 67 6f 74 6f 2d 73 75 |" [dired|-goto-su|
|00003610| 62 64 69 72 20 66 6e 20 | 64 69 72 65 64 2d 6b 69 |bdir fn |dired-ki|
|00003620| 6c 6c 2d 73 75 62 64 69 | 72 20 67 65 74 2d 66 69 |ll-subdi|r get-fi|
|00003630| 6c 65 2d 62 75 66 66 65 | 72 20 62 75 66 20 79 2d |le-buffe|r buf y-|
|00003640| 6f 72 2d 6e 2d 70 20 66 | 6f 72 6d 61 74 20 22 4b |or-n-p f|ormat "K|
|00003650| 69 6c 6c 20 62 75 66 66 | 65 72 20 6f 66 20 25 73 |ill buff|er of %s|
|00003660| 2c 20 74 6f 6f 3f 20 22 | 20 66 69 6c 65 2d 6e 61 |, too? "| file-na|
|00003670| 6d 65 2d 6e 6f 6e 64 69 | 72 65 63 74 6f 72 79 20 |me-nondi|rectory |
|00003680| 6b 69 6c 6c 2d 62 75 66 | 66 65 72 20 64 69 72 65 |kill-buf|fer dire|
|00003690| 64 2d 62 75 66 66 65 72 | 73 2d 66 6f 72 2d 74 6f |d-buffer|s-for-to|
|000036a0| 70 2d 64 69 72 20 6e 69 | 6c 20 62 75 66 2d 6c 69 |p-dir ni|l buf-li|
|000036b0| 73 74 20 22 4b 69 6c 6c | 20 64 69 72 65 64 20 62 |st "Kill| dired b|
|000036c0| 75 66 66 65 72 25 73 20 | 6f 66 20 25 73 2c 20 74 |uffer%s |of %s, t|
|000036d0| 6f 6f 3f 20 22 20 64 69 | 72 65 64 2d 70 6c 75 72 |oo? " di|red-plur|
|000036e0| 61 6c 2d 73 5d 20 37 5d | 20 6d 61 6b 65 2d 76 61 |al-s] 7]| make-va|
|000036f0| 72 69 61 62 6c 65 2d 62 | 75 66 66 65 72 2d 6c 6f |riable-b|uffer-lo|
|00003700| 63 61 6c 20 62 6f 75 6e | 64 70 20 64 69 72 65 64 |cal boun|dp dired|
|00003710| 2d 6f 6d 69 74 2d 66 69 | 6c 65 73 2d 70 20 6e 69 |-omit-fi|les-p ni|
|00003720| 6c 20 70 75 74 20 76 61 | 72 69 61 62 6c 65 2d 64 |l put va|riable-d|
|00003730| 6f 63 75 6d 65 6e 74 61 | 74 69 6f 6e 20 22 2a 49 |ocumenta|tion "*I|
|00003740| 66 20 6e 6f 6e 2d 6e 69 | 6c 2c 20 5c 22 75 6e 69 |f non-ni|l, \"uni|
|00003750| 6e 74 65 72 65 73 74 69 | 6e 67 5c 22 20 66 69 6c |nteresti|ng\" fil|
|00003760| 65 73 20 61 72 65 20 6e | 6f 74 20 6c 69 73 74 65 |es are n|ot liste|
|00003770| 64 20 28 62 75 66 66 65 | 72 2d 6c 6f 63 61 6c 29 |d (buffe|r-local)|
|00003780| 2e 5c 6e 55 73 65 20 5c | 5c 5b 64 69 72 65 64 2d |.\nUse \|\[dired-|
|00003790| 6f 6d 69 74 2d 74 6f 67 | 67 6c 65 5d 20 74 6f 20 |omit-tog|gle] to |
|000037a0| 74 6f 67 67 6c 65 20 69 | 74 73 20 76 61 6c 75 65 |toggle i|ts value|
|000037b0| 2e 5c 6e 55 6e 69 6e 74 | 65 72 65 73 74 69 6e 67 |.\nUnint|eresting|
|000037c0| 20 66 69 6c 65 73 20 61 | 72 65 20 74 68 6f 73 65 | files a|re those|
|000037d0| 20 77 68 6f 73 65 20 66 | 69 6c 65 6e 61 6d 65 73 | whose f|ilenames|
|000037e0| 20 6d 61 74 63 68 20 72 | 65 67 65 78 70 20 60 64 | match r|egexp `d|
|000037f0| 69 72 65 64 2d 6f 6d 69 | 74 2d 66 69 6c 65 73 27 |ired-omi|t-files'|
|00003800| 2c 5c 6e 70 6c 75 73 20 | 74 68 6f 73 65 20 65 6e |,\nplus |those en|
|00003810| 64 69 6e 67 20 77 69 74 | 68 20 65 78 74 65 6e 73 |ding wit|h extens|
|00003820| 69 6f 6e 73 20 69 6e 20 | 60 64 69 72 65 64 2d 6f |ions in |`dired-o|
|00003830| 6d 69 74 2d 65 78 74 65 | 6e 73 69 6f 6e 73 27 2e |mit-exte|nsions'.|
|00003840| 22 5d 20 35 29 0a 28 64 | 65 66 76 61 72 20 64 69 |"] 5).(d|efvar di|
|00003850| 72 65 64 2d 6f 6d 69 74 | 2d 66 69 6c 65 73 20 22 |red-omit|-files "|
|00003860| 5e 23 5c 5c 7c 5c 5c 2e | 24 22 20 22 5c 0a 2a 46 |^#\\|\\.|$" "\.*F|
|00003870| 69 6c 65 6e 61 6d 65 73 | 20 6d 61 74 63 68 69 6e |ilenames| matchin|
|00003880| 67 20 74 68 69 73 20 72 | 65 67 65 78 70 20 77 69 |g this r|egexp wi|
|00003890| 6c 6c 20 6e 6f 74 20 62 | 65 20 64 69 73 70 6c 61 |ll not b|e displa|
|000038a0| 79 65 64 20 28 62 75 66 | 66 65 72 2d 6c 6f 63 61 |yed (buf|fer-loca|
|000038b0| 6c 29 2e 0a 54 68 69 73 | 20 6f 6e 6c 79 20 68 61 |l)..This| only ha|
|000038c0| 73 20 65 66 66 65 63 74 | 20 77 68 65 6e 20 60 64 |s effect| when `d|
|000038d0| 69 72 65 64 2d 6f 6d 69 | 74 2d 66 69 6c 65 73 2d |ired-omi|t-files-|
|000038e0| 70 27 20 69 73 20 74 2e | 0a 53 65 65 20 61 6c 73 |p' is t.|.See als|
|000038f0| 6f 20 60 64 69 72 65 64 | 2d 6f 6d 69 74 2d 65 78 |o `dired|-omit-ex|
|00003900| 74 65 6e 73 69 6f 6e 73 | 27 2e 22 29 0a 28 64 65 |tensions|'.").(de|
|00003910| 66 76 61 72 20 64 69 72 | 65 64 2d 6f 6d 69 74 2d |fvar dir|ed-omit-|
|00003920| 65 78 74 65 6e 73 69 6f | 6e 73 20 28 61 70 70 65 |extensio|ns (appe|
|00003930| 6e 64 20 63 6f 6d 70 6c | 65 74 69 6f 6e 2d 69 67 |nd compl|etion-ig|
|00003940| 6e 6f 72 65 64 2d 65 78 | 74 65 6e 73 69 6f 6e 73 |nored-ex|tensions|
|00003950| 20 6c 61 74 65 78 2d 75 | 6e 63 6c 65 61 6e 2d 65 | latex-u|nclean-e|
|00003960| 78 74 65 6e 73 69 6f 6e | 73 20 62 69 62 74 65 78 |xtension|s bibtex|
|00003970| 2d 75 6e 63 6c 65 61 6e | 2d 65 78 74 65 6e 73 69 |-unclean|-extensi|
|00003980| 6f 6e 73 20 74 65 78 69 | 6e 66 6f 2d 75 6e 63 6c |ons texi|nfo-uncl|
|00003990| 65 61 6e 2d 65 78 74 65 | 6e 73 69 6f 6e 73 29 20 |ean-exte|nsions) |
|000039a0| 22 5c 0a 2a 49 66 20 6e | 6f 6e 2d 6e 69 6c 2c 20 |"\.*If n|on-nil, |
|000039b0| 61 20 6c 69 73 74 20 6f | 66 20 65 78 74 65 6e 73 |a list o|f extens|
|000039c0| 69 6f 6e 73 20 28 73 74 | 72 69 6e 67 73 29 20 74 |ions (st|rings) t|
|000039d0| 6f 20 6f 6d 69 74 20 66 | 72 6f 6d 20 44 69 72 65 |o omit f|rom Dire|
|000039e0| 64 0a 6c 69 73 74 69 6e | 67 73 2e 20 20 44 65 66 |d.listin|gs. Def|
|000039f0| 61 75 6c 74 73 20 74 6f | 20 74 68 65 20 65 6c 65 |aults to| the ele|
|00003a00| 6d 65 6e 74 73 20 6f 66 | 0a 60 63 6f 6d 70 6c 65 |ments of|.`comple|
|00003a10| 74 69 6f 6e 2d 69 67 6e | 6f 72 65 64 2d 65 78 74 |tion-ign|ored-ext|
|00003a20| 65 6e 73 69 6f 6e 73 27 | 2c 20 60 6c 61 74 65 78 |ensions'|, `latex|
|00003a30| 2d 75 6e 63 6c 65 61 6e | 2d 65 78 74 65 6e 73 69 |-unclean|-extensi|
|00003a40| 6f 6e 73 27 2c 0a 60 62 | 69 62 74 65 78 2d 75 6e |ons',.`b|ibtex-un|
|00003a50| 63 6c 65 61 6e 2d 65 78 | 74 65 6e 73 69 6f 6e 73 |clean-ex|tensions|
|00003a60| 27 20 61 6e 64 20 60 74 | 65 78 69 6e 66 6f 2d 75 |' and `t|exinfo-u|
|00003a70| 6e 63 6c 65 61 6e 2d 65 | 78 74 65 6e 73 69 6f 6e |nclean-e|xtension|
|00003a80| 73 27 2e 22 29 0a 28 64 | 65 66 76 61 72 20 64 69 |s'.").(d|efvar di|
|00003a90| 72 65 64 2d 6f 6d 69 74 | 2d 6c 6f 63 61 6c 70 20 |red-omit|-localp |
|00003aa0| 27 6e 6f 2d 64 69 72 20 | 22 5c 0a 54 68 65 20 4c |'no-dir |"\.The L|
|00003ab0| 4f 43 41 4c 50 20 61 72 | 67 75 6d 65 6e 74 20 64 |OCALP ar|gument d|
|00003ac0| 69 72 65 64 2d 6f 6d 69 | 74 2d 65 78 70 75 6e 67 |ired-omi|t-expung|
|00003ad0| 65 20 70 61 73 73 65 73 | 20 74 6f 20 64 69 72 65 |e passes| to dire|
|00003ae0| 64 2d 67 65 74 2d 66 69 | 6c 65 6e 61 6d 65 2e 0a |d-get-fi|lename..|
|00003af0| 49 66 20 69 74 20 69 73 | 20 27 6e 6f 2d 64 69 72 |If it is| 'no-dir|
|00003b00| 2c 20 6f 6d 69 74 74 69 | 6e 67 20 69 73 20 6d 75 |, omitti|ng is mu|
|00003b10| 63 68 20 66 61 73 74 65 | 72 2c 20 62 75 74 20 79 |ch faste|r, but y|
|00003b20| 6f 75 20 63 61 6e 20 6f | 6e 6c 79 20 6d 61 74 63 |ou can o|nly matc|
|00003b30| 68 0a 61 67 61 69 6e 73 | 74 20 74 68 65 20 62 61 |h.agains|t the ba|
|00003b40| 73 65 6e 61 6d 65 20 6f | 66 20 74 68 65 20 66 69 |sename o|f the fi|
|00003b50| 6c 65 2e 20 20 53 65 74 | 20 69 74 20 74 6f 20 6e |le. Set| it to n|
|00003b60| 69 6c 20 69 66 20 79 6f | 75 20 6e 65 65 64 20 74 |il if yo|u need t|
|00003b70| 6f 20 6d 61 74 63 68 20 | 74 68 65 0a 77 68 6f 6c |o match |the.whol|
|00003b80| 65 20 70 61 74 68 6e 61 | 6d 65 2e 22 29 0a 28 64 |e pathna|me.").(d|
|00003b90| 65 66 76 61 72 20 64 69 | 72 65 64 2d 6f 6d 69 74 |efvar di|red-omit|
|00003ba0| 2d 6d 61 72 6b 65 72 2d | 63 68 61 72 20 31 35 20 |-marker-|char 15 |
|00003bb0| 22 5c 0a 54 65 6d 70 6f | 72 61 72 79 20 6d 61 72 |"\.Tempo|rary mar|
|00003bc0| 6b 65 72 20 75 73 65 64 | 20 62 79 20 62 79 20 64 |ker used| by by d|
|00003bd0| 69 72 65 64 2d 6f 6d 69 | 74 2e 0a 53 68 6f 75 6c |ired-omi|t..Shoul|
|00003be0| 64 20 6e 65 76 65 72 20 | 62 65 20 75 73 65 64 20 |d never |be used |
|00003bf0| 61 73 20 6d 61 72 6b 65 | 72 20 62 79 20 74 68 65 |as marke|r by the|
|00003c00| 20 75 73 65 72 20 6f 72 | 20 6f 74 68 65 72 20 70 | user or| other p|
|00003c10| 61 63 6b 61 67 65 73 2e | 22 29 0a 28 66 73 65 74 |ackages.|").(fset|
|00003c20| 20 27 64 69 72 65 64 2d | 6f 6d 69 74 2d 73 74 61 | 'dired-|omit-sta|
|00003c30| 72 74 75 70 20 23 5b 6e | 69 6c 20 22 c0 09 9e ae |rtup #[n|il "....|
|00003c40| 86 c2 09 c3 5c 22 89 11 | 87 22 20 5b 64 69 72 65 |....\"..|." [dire|
|00003c50| 64 2d 6f 6d 69 74 2d 66 | 69 6c 65 73 2d 70 20 6d |d-omit-f|iles-p m|
|00003c60| 69 6e 6f 72 2d 6d 6f 64 | 65 2d 61 6c 69 73 74 20 |inor-mod|e-alist |
|00003c70| 61 70 70 65 6e 64 20 28 | 28 64 69 72 65 64 2d 6f |append (|(dired-o|
|00003c80| 6d 69 74 2d 66 69 6c 65 | 73 2d 70 20 22 20 4f 6d |mit-file|s-p " Om|
|00003c90| 69 74 22 29 29 5d 20 33 | 5d 29 0a 28 66 73 65 74 |it"))] 3|]).(fset|
|00003ca0| 20 27 64 69 72 65 64 2d | 6f 6d 69 74 2d 74 6f 67 | 'dired-|omit-tog|
|00003cb0| 67 6c 65 20 23 5b 28 26 | 6f 70 74 69 6f 6e 61 6c |gle #[(&|optional|
|00003cc0| 20 66 6c 61 67 29 20 22 | 08 ab 90 09 ab 85 09 3f | flag) "|.......?|
|00003cd0| 89 11 87 c2 c3 20 c4 89 | 0d 24 87 09 3f 89 11 ac |..... ..|.$..?...|
|00003ce0| 83 c6 20 87 c7 20 87 22 | 20 5b 66 6c 61 67 20 64 |.. .. ."| [flag d|
|00003cf0| 69 72 65 64 2d 6f 6d 69 | 74 2d 66 69 6c 65 73 2d |ired-omi|t-files-|
|00003d00| 70 20 64 69 72 65 64 2d | 6d 61 72 6b 2d 75 6e 6d |p dired-|mark-unm|
|00003d10| 61 72 6b 65 64 2d 66 69 | 6c 65 73 20 64 69 72 65 |arked-fi|les dire|
|00003d20| 64 2d 6f 6d 69 74 2d 72 | 65 67 65 78 70 20 6e 69 |d-omit-r|egexp ni|
|00003d30| 6c 20 64 69 72 65 64 2d | 6f 6d 69 74 2d 6c 6f 63 |l dired-|omit-loc|
|00003d40| 61 6c 70 20 72 65 76 65 | 72 74 2d 62 75 66 66 65 |alp reve|rt-buffe|
|00003d50| 72 20 64 69 72 65 64 2d | 6f 6d 69 74 2d 65 78 70 |r dired-|omit-exp|
|00003d60| 75 6e 67 65 5d 20 36 20 | 22 5c 0a 54 6f 67 67 6c |unge] 6 |"\.Toggl|
|00003d70| 65 20 62 65 74 77 65 65 | 6e 20 64 69 73 70 6c 61 |e betwee|n displa|
|00003d80| 79 69 6e 67 20 61 6e 64 | 20 6f 6d 69 74 74 69 6e |ying and| omittin|
|00003d90| 67 20 66 69 6c 65 73 20 | 6d 61 74 63 68 69 6e 67 |g files |matching|
|00003da0| 20 60 64 69 72 65 64 2d | 6f 6d 69 74 2d 66 69 6c | `dired-|omit-fil|
|00003db0| 65 73 27 2e 0a 57 69 74 | 68 20 61 6e 20 61 72 67 |es'..Wit|h an arg|
|00003dc0| 2c 20 61 6e 64 20 69 66 | 20 6f 6d 69 74 74 69 6e |, and if| omittin|
|00003dd0| 67 20 77 61 73 20 6f 66 | 66 2c 20 64 6f 6e 27 74 |g was of|f, don't|
|00003de0| 20 74 6f 67 67 6c 65 20 | 61 6e 64 20 6a 75 73 74 | toggle |and just|
|00003df0| 20 6d 61 72 6b 20 74 68 | 65 0a 20 20 66 69 6c 65 | mark th|e. file|
|00003e00| 73 20 62 75 74 20 64 6f | 6e 27 74 20 61 63 74 75 |s but do|n't actu|
|00003e10| 61 6c 6c 79 20 6f 6d 69 | 74 20 74 68 65 6d 2e 0a |ally omi|t them..|
|00003e20| 57 69 74 68 20 61 6e 20 | 61 72 67 2c 20 61 6e 64 |With an |arg, and|
|00003e30| 20 69 66 20 6f 6d 69 74 | 74 69 6e 67 20 77 61 73 | if omit|ting was|
|00003e40| 20 6f 6e 2c 20 74 75 72 | 6e 20 69 74 20 6f 66 66 | on, tur|n it off|
|00003e50| 20 62 75 74 20 64 6f 6e | 27 74 20 72 65 66 72 65 | but don|'t refre|
|00003e60| 73 68 20 74 68 65 20 62 | 75 66 66 65 72 2e 22 20 |sh the b|uffer." |
|00003e70| 22 50 22 5d 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |"P"]).(b|yte-code|
|00003e80| 20 22 c0 c1 21 ac 82 c2 | 11 c3 c4 21 ab 84 c5 c4 | "..!...|...!....|
|00003e90| 4d 88 c2 87 22 20 5b 62 | 6f 75 6e 64 70 20 64 69 |M..." [b|oundp di|
|00003ea0| 72 65 64 2d 6f 6d 69 74 | 2d 73 69 6c 65 6e 74 20 |red-omit|-silent |
|00003eb0| 6e 69 6c 20 66 62 6f 75 | 6e 64 70 20 64 69 72 65 |nil fbou|ndp dire|
|00003ec0| 64 2d 64 6f 2d 6b 69 6c | 6c 2d 6c 69 6e 65 73 20 |d-do-kil|l-lines |
|00003ed0| 64 69 72 65 64 2d 64 6f | 2d 6b 69 6c 6c 5d 20 32 |dired-do|-kill] 2|
|00003ee0| 29 0a 28 66 73 65 74 20 | 27 64 69 72 65 64 2d 6f |).(fset |'dired-o|
|00003ef0| 6d 69 74 2d 65 78 70 75 | 6e 67 65 20 23 5b 28 26 |mit-expu|nge #[(&|
|00003f00| 6f 70 74 69 6f 6e 61 6c | 20 72 65 67 65 78 70 29 |optional| regexp)|
|00003f10| 20 22 08 ad bb 09 ae 82 | c2 20 c3 1c 89 1d c6 98 | "......|. ......|
|00003f20| ac ac 0e 07 1e 08 0e 09 | ac 84 ca cb 21 88 cc 0d |........|....!...|
|00003f30| c3 89 0e 0d 24 ab 8e ce | c3 0e 09 ab 83 c6 aa 81 |....$...|........|
|00003f40| cf 5c 22 14 aa 88 0e 09 | ac 84 ca d0 21 88 29 0c |.\".....|....!.).|
|00003f50| 2a 87 22 20 5b 64 69 72 | 65 64 2d 6f 6d 69 74 2d |*." [dir|ed-omit-|
|00003f60| 66 69 6c 65 73 2d 70 20 | 72 65 67 65 78 70 20 64 |files-p |regexp d|
|00003f70| 69 72 65 64 2d 6f 6d 69 | 74 2d 72 65 67 65 78 70 |ired-omi|t-regexp|
|00003f80| 20 6e 69 6c 20 63 6f 75 | 6e 74 20 6f 6d 69 74 2d | nil cou|nt omit-|
|00003f90| 72 65 20 22 22 20 64 69 | 72 65 64 2d 6f 6d 69 74 |re "" di|red-omit|
|00003fa0| 2d 6d 61 72 6b 65 72 2d | 63 68 61 72 20 64 69 72 |-marker-|char dir|
|00003fb0| 65 64 2d 6d 61 72 6b 65 | 72 2d 63 68 61 72 20 64 |ed-marke|r-char d|
|00003fc0| 69 72 65 64 2d 6f 6d 69 | 74 2d 73 69 6c 65 6e 74 |ired-omi|t-silent|
|00003fd0| 20 6d 65 73 73 61 67 65 | 20 22 4f 6d 69 74 74 69 | message| "Omitti|
|00003fe0| 6e 67 2e 2e 2e 22 20 64 | 69 72 65 64 2d 6d 61 72 |ng..." d|ired-mar|
|00003ff0| 6b 2d 75 6e 6d 61 72 6b | 65 64 2d 66 69 6c 65 73 |k-unmark|ed-files|
|00004000| 20 64 69 72 65 64 2d 6f | 6d 69 74 2d 6c 6f 63 61 | dired-o|mit-loca|
|00004010| 6c 70 20 64 69 72 65 64 | 2d 64 6f 2d 6b 69 6c 6c |lp dired|-do-kill|
|00004020| 20 22 4f 6d 69 74 74 65 | 64 20 25 64 20 6c 69 6e | "Omitte|d %d lin|
|00004030| 65 25 73 2e 22 20 22 28 | 4e 6f 74 68 69 6e 67 20 |e%s." "(|Nothing |
|00004040| 74 6f 20 6f 6d 69 74 29 | 22 5d 20 36 20 22 5c 0a |to omit)|"] 6 "\.|
|00004050| 45 72 61 73 65 73 20 61 | 6c 6c 20 75 6e 6d 61 72 |Erases a|ll unmar|
|00004060| 6b 65 64 20 66 69 6c 65 | 73 20 6d 61 74 63 68 69 |ked file|s matchi|
|00004070| 6e 67 20 52 45 47 45 58 | 50 2e 0a 44 6f 65 73 20 |ng REGEX|P..Does |
|00004080| 6e 6f 74 68 69 6e 67 20 | 69 66 20 67 6c 6f 62 61 |nothing |if globa|
|00004090| 6c 20 76 61 72 69 61 62 | 6c 65 20 60 64 69 72 65 |l variab|le `dire|
|000040a0| 64 2d 6f 6d 69 74 2d 66 | 69 6c 65 73 2d 70 27 20 |d-omit-f|iles-p' |
|000040b0| 69 73 20 6e 69 6c 2e 0a | 49 66 20 52 45 47 45 58 |is nil..|If REGEX|
|000040c0| 50 20 69 73 20 6e 69 6c | 20 6f 72 20 6e 6f 74 20 |P is nil| or not |
|000040d0| 73 70 65 63 69 66 69 65 | 64 2c 20 75 73 65 73 20 |specifie|d, uses |
|000040e0| 60 64 69 72 65 64 2d 6f | 6d 69 74 2d 66 69 6c 65 |`dired-o|mit-file|
|000040f0| 73 27 2c 20 61 6e 64 20 | 61 6c 73 6f 20 6f 6d 69 |s', and |also omi|
|00004100| 74 73 0a 20 20 66 69 6c | 65 6e 61 6d 65 73 20 65 |ts. fil|enames e|
|00004110| 6e 64 69 6e 67 20 69 6e | 20 60 64 69 72 65 64 2d |nding in| `dired-|
|00004120| 6f 6d 69 74 2d 65 78 74 | 65 6e 73 69 6f 6e 73 27 |omit-ext|ensions'|
|00004130| 2e 0a 49 66 20 52 45 47 | 45 58 50 20 69 73 20 74 |..If REG|EXP is t|
|00004140| 68 65 20 65 6d 70 74 79 | 20 73 74 72 69 6e 67 2c |he empty| string,|
|00004150| 20 74 68 69 73 20 66 75 | 6e 63 74 69 6f 6e 20 69 | this fu|nction i|
|00004160| 73 20 61 20 6e 6f 2d 6f | 70 2e 0a 0a 54 68 69 73 |s a no-o|p...This|
|00004170| 20 66 75 6e 63 74 69 6f | 6e 73 20 77 6f 72 6b 73 | functio|ns works|
|00004180| 20 62 79 20 74 65 6d 70 | 6f 72 61 72 69 6c 79 20 | by temp|orarily |
|00004190| 62 69 6e 64 69 6e 67 20 | 60 64 69 72 65 64 2d 6d |binding |`dired-m|
|000041a0| 61 72 6b 65 72 2d 63 68 | 61 72 27 20 74 6f 0a 60 |arker-ch|ar' to.`|
|000041b0| 64 69 72 65 64 2d 6f 6d | 69 74 2d 6d 61 72 6b 65 |dired-om|it-marke|
|000041c0| 72 2d 63 68 61 72 27 20 | 61 6e 64 20 63 61 6c 6c |r-char' |and call|
|000041d0| 69 6e 67 20 60 64 69 72 | 65 64 2d 64 6f 2d 6b 69 |ing `dir|ed-do-ki|
|000041e0| 6c 6c 27 2e 22 20 22 73 | 4f 6d 69 74 20 66 69 6c |ll'." "s|Omit fil|
|000041f0| 65 73 20 28 72 65 67 65 | 78 70 29 3a 20 22 5d 29 |es (rege|xp): "])|
|00004200| 0a 28 66 73 65 74 20 27 | 64 69 72 65 64 2d 6f 6d |.(fset '|dired-om|
|00004210| 69 74 2d 72 65 67 65 78 | 70 20 23 5b 6e 69 6c 20 |it-regex|p #[nil |
|00004220| 22 08 ab 86 c1 08 c2 51 | aa 81 c3 08 ab 86 0c ab |"......Q|........|
|00004230| 83 c5 aa 81 c3 0c ab 8b | c6 c1 c7 c8 0c c5 23 c9 |........|......#.|
|00004240| 52 aa 81 c3 51 87 22 20 | 5b 64 69 72 65 64 2d 6f |R...Q." |[dired-o|
|00004250| 6d 69 74 2d 66 69 6c 65 | 73 20 22 5c 5c 28 22 20 |mit-file|s "\\(" |
|00004260| 22 5c 5c 29 22 20 22 22 | 20 64 69 72 65 64 2d 6f |"\\)" ""| dired-o|
|00004270| 6d 69 74 2d 65 78 74 65 | 6e 73 69 6f 6e 73 20 22 |mit-exte|nsions "|
|00004280| 5c 5c 7c 22 20 22 2e 22 | 20 6d 61 70 63 6f 6e 63 |\\|" "."| mapconc|
|00004290| 61 74 20 72 65 67 65 78 | 70 2d 71 75 6f 74 65 20 |at regex|p-quote |
|000042a0| 22 5c 5c 29 24 22 5d 20 | 38 5d 29 0a 28 66 73 65 |"\\)$"] |8]).(fse|
|000042b0| 74 20 27 64 69 72 65 64 | 2d 6d 61 72 6b 2d 75 6e |t 'dired|-mark-un|
|000042c0| 6d 61 72 6b 65 64 2d 66 | 69 6c 65 73 20 23 5b 28 |marked-f|iles #[(|
|000042d0| 72 65 67 65 78 70 20 6d | 73 67 20 26 6f 70 74 69 |regexp m|sg &opti|
|000042e0| 6f 6e 61 6c 20 75 6e 66 | 6c 61 67 2d 70 20 6c 6f |onal unf|lag-p lo|
|000042f0| 63 61 6c 70 29 20 22 08 | ab 83 c1 aa 81 5c 6e 1a |calp) ".|.....\n.|
|00004300| c3 89 1c 1d 8a c6 14 0e | 07 ab 86 c8 c9 0e 07 5c |........|.......\|
|00004310| 22 88 65 62 88 6d ac a7 | ca cb 21 ab 9d cc 0e 0d |".eb.m..|..!.....|
|00004320| ce 5c 22 89 1e 0f ad 86 | d0 0e 11 0e 0f 5c 22 29 |.\".....|.....\")|
|00004330| ab 8a d2 d3 21 88 5c 6e | 63 88 0c 54 14 d3 79 88 |....!.\n|c..T..y.|
|00004340| aa 56 0e 07 ab 9e c8 d4 | 0c 0e 07 d5 0c 21 5c 6e |.V......|.....!\n|
|00004350| c1 3d ab 83 d6 aa 81 d7 | 5c 6e 0e 18 3d ab 83 d9 |.=......|\n..=...|
|00004360| aa 81 da 26 06 88 29 0c | c6 56 ad 81 0c 2b 87 22 |...&..).|.V...+."|
|00004370| 20 5b 75 6e 66 6c 61 67 | 2d 70 20 33 32 20 64 69 | [unflag|-p 32 di|
|00004380| 72 65 64 2d 6d 61 72 6b | 65 72 2d 63 68 61 72 20 |red-mark|er-char |
|00004390| 6e 69 6c 20 63 6f 75 6e | 74 20 62 75 66 66 65 72 |nil coun|t buffer|
|000043a0| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 30 20 6d 73 67 |-read-on|ly 0 msg|
|000043b0| 20 6d 65 73 73 61 67 65 | 20 22 4d 61 72 6b 69 6e | message| "Markin|
|000043c0| 67 20 25 73 73 2e 2e 2e | 22 20 6c 6f 6f 6b 69 6e |g %ss...|" lookin|
|000043d0| 67 2d 61 74 20 22 20 22 | 20 64 69 72 65 64 2d 67 |g-at " "| dired-g|
|000043e0| 65 74 2d 66 69 6c 65 6e | 61 6d 65 20 6c 6f 63 61 |et-filen|ame loca|
|000043f0| 6c 70 20 74 20 66 6e 20 | 73 74 72 69 6e 67 2d 6d |lp t fn |string-m|
|00004400| 61 74 63 68 20 72 65 67 | 65 78 70 20 64 65 6c 65 |atch reg|exp dele|
|00004410| 74 65 2d 63 68 61 72 20 | 31 20 22 25 73 20 25 73 |te-char |1 "%s %s|
|00004420| 25 73 20 25 73 25 73 2e | 22 20 64 69 72 65 64 2d |%s %s%s.|" dired-|
|00004430| 70 6c 75 72 61 6c 2d 73 | 20 22 75 6e 22 20 22 22 |plural-s| "un" ""|
|00004440| 20 64 69 72 65 64 2d 64 | 65 6c 2d 6d 61 72 6b 65 | dired-d|el-marke|
|00004450| 72 20 22 66 6c 61 67 67 | 65 64 22 20 22 6d 61 72 |r "flagg|ed" "mar|
|00004460| 6b 65 64 22 5d 20 39 20 | 22 5c 0a 4d 61 72 6b 73 |ked"] 9 |"\.Marks|
|00004470| 20 75 6e 6d 61 72 6b 65 | 64 20 66 69 6c 65 73 20 | unmarke|d files |
|00004480| 6d 61 74 63 68 69 6e 67 | 20 52 45 47 45 58 50 2c |matching| REGEXP,|
|00004490| 20 64 69 73 70 6c 61 79 | 69 6e 67 20 4d 53 47 2e | display|ing MSG.|
|000044a0| 0a 52 45 47 45 58 50 20 | 69 73 20 6d 61 74 63 68 |.REGEXP |is match|
|000044b0| 65 64 20 61 67 61 69 6e | 73 74 20 74 68 65 20 63 |ed again|st the c|
|000044c0| 6f 6d 70 6c 65 74 65 20 | 70 61 74 68 6e 61 6d 65 |omplete |pathname|
|000044d0| 2e 0a 44 6f 65 73 20 6e | 6f 74 20 72 65 2d 6d 61 |..Does n|ot re-ma|
|000044e0| 72 6b 20 66 69 6c 65 73 | 20 77 68 69 63 68 20 61 |rk files| which a|
|000044f0| 6c 72 65 61 64 79 20 68 | 61 76 65 20 61 20 6d 61 |lready h|ave a ma|
|00004500| 72 6b 2e 0a 57 69 74 68 | 20 70 72 65 66 69 78 20 |rk..With| prefix |
|00004510| 61 72 67 75 6d 65 6e 74 | 2c 20 75 6e 66 6c 61 67 |argument|, unflag|
|00004520| 20 61 6c 6c 20 74 68 6f | 73 65 20 66 69 6c 65 73 | all tho|se files|
|00004530| 2e 0a 53 65 63 6f 6e 64 | 20 6f 70 74 69 6f 6e 61 |..Second| optiona|
|00004540| 6c 20 61 72 67 75 6d 65 | 6e 74 20 4c 4f 43 41 4c |l argume|nt LOCAL|
|00004550| 50 20 69 73 20 61 73 20 | 69 6e 20 60 64 69 72 65 |P is as |in `dire|
|00004560| 64 2d 67 65 74 2d 66 69 | 6c 65 6e 61 6d 65 27 2e |d-get-fi|lename'.|
|00004570| 22 20 22 50 22 5d 29 0a | 28 62 79 74 65 2d 63 6f |" "P"]).|(byte-co|
|00004580| 64 65 20 22 c0 c1 4d 88 | c2 c3 21 ac 85 c3 c4 4b |de "..M.|..!....K|
|00004590| 4d 88 c4 c0 4d 87 22 20 | 5b 64 69 72 65 64 2d 6f |M...M." |[dired-o|
|000045a0| 6d 69 74 2d 6e 65 77 2d | 61 64 64 2d 65 6e 74 72 |mit-new-|add-entr|
|000045b0| 79 20 23 5b 28 66 69 6c | 65 6e 61 6d 65 20 26 6f |y #[(fil|ename &o|
|000045c0| 70 74 69 6f 6e 61 6c 20 | 6d 61 72 6b 65 72 2d 63 |ptional |marker-c|
|000045d0| 68 61 72 29 20 22 08 ab | b2 c1 20 89 1a c3 98 ac |har) "..|.. .....|
|000045e0| 9f c4 5c 6e 0d c6 3d ab | 84 0e 07 aa 91 0d c8 3d |..\n..=.|.......=|
|000045f0| ab 86 c9 0e 07 21 aa 86 | ca 0e 07 0e 0b 5c 22 5c |.....!..|.....\"\|
|00004600| 22 ac 88 cc 0e 07 0e 0d | 5c 22 aa 81 c8 29 87 cc |".......|\"...)..|
|00004610| 0e 07 0e 0d 5c 22 87 22 | 20 5b 64 69 72 65 64 2d |....\"."| [dired-|
|00004620| 6f 6d 69 74 2d 66 69 6c | 65 73 2d 70 20 64 69 72 |omit-fil|es-p dir|
|00004630| 65 64 2d 6f 6d 69 74 2d | 72 65 67 65 78 70 20 6f |ed-omit-|regexp o|
|00004640| 6d 69 74 2d 72 65 20 22 | 22 20 73 74 72 69 6e 67 |mit-re "|" string|
|00004650| 2d 6d 61 74 63 68 20 64 | 69 72 65 64 2d 6f 6d 69 |-match d|ired-omi|
|00004660| 74 2d 6c 6f 63 61 6c 70 | 20 6e 6f 2d 64 69 72 20 |t-localp| no-dir |
|00004670| 66 69 6c 65 6e 61 6d 65 | 20 74 20 64 69 72 65 64 |filename| t dired|
|00004680| 2d 6d 61 6b 65 2d 72 65 | 6c 61 74 69 76 65 20 64 |-make-re|lative d|
|00004690| 69 72 65 64 2d 6d 61 6b | 65 2d 61 62 73 6f 6c 75 |ired-mak|e-absolu|
|000046a0| 74 65 20 64 69 72 65 63 | 74 6f 72 79 20 64 69 72 |te direc|tory dir|
|000046b0| 65 64 2d 6f 6d 69 74 2d | 6f 6c 64 2d 61 64 64 2d |ed-omit-|old-add-|
|000046c0| 65 6e 74 72 79 20 6d 61 | 72 6b 65 72 2d 63 68 61 |entry ma|rker-cha|
|000046d0| 72 5d 20 36 5d 20 66 62 | 6f 75 6e 64 70 20 64 69 |r] 6] fb|oundp di|
|000046e0| 72 65 64 2d 6f 6d 69 74 | 2d 6f 6c 64 2d 61 64 64 |red-omit|-old-add|
|000046f0| 2d 65 6e 74 72 79 20 64 | 69 72 65 64 2d 61 64 64 |-entry d|ired-add|
|00004700| 2d 65 6e 74 72 79 5d 20 | 32 29 0a 28 66 73 65 74 |-entry] |2).(fset|
|00004710| 20 27 64 69 72 65 64 2d | 6d 61 72 6b 2d 73 65 78 | 'dired-|mark-sex|
|00004720| 70 20 23 5b 28 70 72 65 | 64 69 63 61 74 65 20 26 |p #[(pre|dicate &|
|00004730| 6f 70 74 69 6f 6e 61 6c | 20 75 6e 66 6c 61 67 2d |optional| unflag-|
|00004740| 70 29 20 22 c0 c1 5c 6e | 5c 22 88 0b ab 83 c4 aa |p) "..\n|\"......|
|00004750| 81 0d c6 89 89 89 89 89 | 89 89 89 89 1e 07 1e 08 |........|........|
|00004760| 1e 09 1e 5c 6e 1e 0b 1e | 0c 1e 0d 1e 0e 1e 0f 1e |...\n...|........|
|00004770| 10 1d c6 89 1e 11 1e 12 | 8a d3 16 11 d4 d5 5c 6e |........|......\n|
|00004780| 5c 22 ab 88 c0 d6 d4 d5 | 5c 6e 5c 22 5c 22 88 65 |\"......|\n\"\".e|
|00004790| 62 88 6d ac 9c 8a d7 20 | ad 83 d8 5c 6e 21 29 ab |b.m.... |...\n!).|
|000047a0| 8c d9 da 21 88 0d 63 88 | 0e 11 54 16 11 da 79 88 |...!..c.|..T...y.|
|000047b0| aa 61 d4 d5 5c 6e 5c 22 | ab a2 c0 db 0e 11 d4 d5 |.a..\n\"|........|
|000047c0| 5c 6e 5c 22 dc 0e 11 21 | 0d c4 3d ab 83 dd aa 81 |\n\"...!|..=.....|
|000047d0| de 0d 0e 1f 3d ab 83 e0 | aa 81 e1 26 06 88 29 0e |....=...|...&..).|
|000047e0| 11 d3 56 ad 82 0e 11 2e | 0d 87 22 20 5b 6d 65 73 |..V.....|.." [mes|
|000047f0| 73 61 67 65 20 22 25 73 | 22 20 70 72 65 64 69 63 |sage "%s|" predic|
|00004800| 61 74 65 20 75 6e 66 6c | 61 67 2d 70 20 33 32 20 |ate unfl|ag-p 32 |
|00004810| 64 69 72 65 64 2d 6d 61 | 72 6b 65 72 2d 63 68 61 |dired-ma|rker-cha|
|00004820| 72 20 6e 69 6c 20 73 79 | 6d 20 6e 61 6d 65 20 74 |r nil sy|m name t|
|00004830| 69 6d 65 20 73 69 7a 65 | 20 67 69 64 20 75 69 64 |ime size| gid uid|
|00004840| 20 6e 6c 69 6e 6b 20 6d | 6f 64 65 20 73 20 69 6e | nlink m|ode s in|
|00004850| 6f 64 65 20 63 6f 75 6e | 74 20 62 75 66 66 65 72 |ode coun|t buffer|
|00004860| 2d 72 65 61 64 2d 6f 6e | 6c 79 20 30 20 66 6f 72 |-read-on|ly 0 for|
|00004870| 6d 61 74 20 22 27 25 73 | 20 66 69 6c 65 22 20 22 |mat "'%s| file" "|
|00004880| 4d 61 72 6b 69 6e 67 20 | 25 73 73 2e 2e 2e 22 20 |Marking |%ss..." |
|00004890| 64 69 72 65 64 2d 70 61 | 72 73 65 2d 6c 73 20 65 |dired-pa|rse-ls e|
|000048a0| 76 61 6c 20 64 65 6c 65 | 74 65 2d 63 68 61 72 20 |val dele|te-char |
|000048b0| 31 20 22 25 73 20 25 73 | 25 73 20 25 73 25 73 2e |1 "%s %s|%s %s%s.|
|000048c0| 22 20 64 69 72 65 64 2d | 70 6c 75 72 61 6c 2d 73 |" dired-|plural-s|
|000048d0| 20 22 75 6e 22 20 22 22 | 20 64 69 72 65 64 2d 64 | "un" ""| dired-d|
|000048e0| 65 6c 2d 6d 61 72 6b 65 | 72 20 22 66 6c 61 67 67 |el-marke|r "flagg|
|000048f0| 65 64 22 20 22 6d 61 72 | 6b 65 64 22 5d 20 31 31 |ed" "mar|ked"] 11|
|00004900| 20 22 5c 0a 4d 61 72 6b | 20 66 69 6c 65 73 20 66 | "\.Mark| files f|
|00004910| 6f 72 20 77 68 69 63 68 | 20 50 52 45 44 49 43 41 |or which| PREDICA|
|00004920| 54 45 20 72 65 74 75 72 | 6e 73 20 6e 6f 6e 2d 6e |TE retur|ns non-n|
|00004930| 69 6c 2e 0a 57 69 74 68 | 20 61 20 70 72 65 66 69 |il..With| a prefi|
|00004940| 78 20 61 72 67 2c 20 75 | 6e 66 6c 61 67 20 74 68 |x arg, u|nflag th|
|00004950| 6f 73 65 20 66 69 6c 65 | 73 20 69 6e 73 74 65 61 |ose file|s instea|
|00004960| 64 2e 0a 0a 50 52 45 44 | 49 43 41 54 45 20 69 73 |d...PRED|ICATE is|
|00004970| 20 61 20 6c 69 73 70 20 | 65 78 70 72 65 73 73 69 | a lisp |expressi|
|00004980| 6f 6e 20 74 68 61 74 20 | 63 61 6e 20 72 65 66 65 |on that |can refe|
|00004990| 72 20 74 6f 20 74 68 65 | 20 66 6f 6c 6c 6f 77 69 |r to the| followi|
|000049a0| 6e 67 20 73 79 6d 62 6f | 6c 73 3a 0a 0a 20 20 20 |ng symbo|ls:.. |
|000049b0| 20 69 6e 6f 64 65 20 20 | 5b 69 6e 74 65 67 65 72 | inode |[integer|
|000049c0| 5d 20 74 68 65 20 69 6e | 6f 64 65 20 6f 66 20 74 |] the in|ode of t|
|000049d0| 68 65 20 66 69 6c 65 20 | 28 6f 6e 6c 79 20 66 6f |he file |(only fo|
|000049e0| 72 20 6c 73 20 2d 69 20 | 6f 75 74 70 75 74 29 0a |r ls -i |output).|
|000049f0| 20 20 20 20 73 20 20 20 | 20 20 20 5b 69 6e 74 65 | s | [inte|
|00004a00| 67 65 72 5d 20 74 68 65 | 20 73 69 7a 65 20 6f 66 |ger] the| size of|
|00004a10| 20 74 68 65 20 66 69 6c | 65 20 66 6f 72 20 6c 73 | the fil|e for ls|
|00004a20| 20 2d 73 20 6f 75 74 70 | 75 74 0a 09 20 20 20 20 | -s outp|ut.. |
|00004a30| 20 20 20 20 20 20 20 20 | 20 28 75 73 75 73 61 6c | | (ususal|
|00004a40| 6c 79 20 69 6e 20 62 6c | 6f 63 6b 73 20 6f 72 2c |ly in bl|ocks or,|
|00004a50| 20 77 69 74 68 20 2d 6b | 2c 20 69 6e 20 4b 42 79 | with -k|, in KBy|
|00004a60| 74 65 29 0a 20 20 20 20 | 6d 6f 64 65 20 20 20 5b |te). |mode [|
|00004a70| 73 74 72 69 6e 67 5d 20 | 20 66 69 6c 65 20 70 65 |string] | file pe|
|00004a80| 72 6d 69 73 73 69 6f 6e | 20 62 69 74 73 2c 20 65 |rmission| bits, e|
|00004a90| 2e 67 2e 20 5c 22 2d 72 | 77 2d 72 2d 2d 72 2d 2d |.g. \"-r|w-r--r--|
|00004aa0| 5c 22 0a 20 20 20 20 6e | 6c 69 6e 6b 20 20 5b 69 |\". n|link [i|
|00004ab0| 6e 74 65 67 65 72 5d 20 | 6e 75 6d 62 65 72 20 6f |nteger] |number o|
|00004ac0| 66 20 6c 69 6e 6b 73 20 | 74 6f 20 66 69 6c 65 0a |f links |to file.|
|00004ad0| 20 20 20 20 75 69 64 20 | 20 20 20 5b 73 74 72 69 | uid | [stri|
|00004ae0| 6e 67 5d 20 20 6f 77 6e | 65 72 0a 20 20 20 20 67 |ng] own|er. g|
|00004af0| 69 64 20 20 20 20 5b 73 | 74 72 69 6e 67 5d 20 20 |id [s|tring] |
|00004b00| 67 72 6f 75 70 20 20 28 | 49 66 20 74 68 65 20 67 |group (|If the g|
|00004b10| 69 64 20 69 73 20 6e 6f | 74 20 64 69 73 70 6c 61 |id is no|t displa|
|00004b20| 79 65 64 20 62 79 20 6c | 73 2c 0a 09 20 20 20 20 |yed by l|s,.. |
|00004b30| 20 20 20 20 20 20 20 20 | 20 74 68 69 73 20 77 69 | | this wi|
|00004b40| 6c 6c 20 73 74 69 6c 6c | 20 62 65 20 73 65 74 20 |ll still| be set |
|00004b50| 28 74 6f 20 74 68 65 20 | 73 61 6d 65 20 61 73 20 |(to the |same as |
|00004b60| 75 69 64 29 29 0a 20 20 | 20 20 73 69 7a 65 20 20 |uid)). | size |
|00004b70| 20 5b 69 6e 74 65 67 65 | 72 5d 20 66 69 6c 65 20 | [intege|r] file |
|00004b80| 73 69 7a 65 20 69 6e 20 | 62 79 74 65 73 0a 20 20 |size in |bytes. |
|00004b90| 20 20 74 69 6d 65 20 20 | 20 5b 73 74 72 69 6e 67 | time | [string|
|00004ba0| 5d 20 20 74 68 65 20 74 | 69 6d 65 20 74 68 61 74 |] the t|ime that|
|00004bb0| 20 6c 73 20 64 69 73 70 | 6c 61 79 73 2c 20 65 2e | ls disp|lays, e.|
|00004bc0| 67 2e 20 5c 22 46 65 62 | 20 31 32 20 31 34 3a 31 |g. \"Feb| 12 14:1|
|00004bd0| 37 5c 22 0a 20 20 20 20 | 6e 61 6d 65 20 20 20 5b |7\". |name [|
|00004be0| 73 74 72 69 6e 67 5d 20 | 20 74 68 65 20 6e 61 6d |string] | the nam|
|00004bf0| 65 20 6f 66 20 74 68 65 | 20 66 69 6c 65 0a 20 20 |e of the| file. |
|00004c00| 20 20 73 79 6d 20 20 20 | 20 5b 73 74 72 69 6e 67 | sym | [string|
|00004c10| 5d 20 20 69 66 20 66 69 | 6c 65 20 69 73 20 61 20 |] if fi|le is a |
|00004c20| 73 79 6d 62 6f 6c 69 63 | 20 6c 69 6e 6b 2c 20 74 |symbolic| link, t|
|00004c30| 68 65 20 6c 69 6e 6b 65 | 64 2d 74 6f 20 6e 61 6d |he linke|d-to nam|
|00004c40| 65 2c 20 65 6c 73 65 20 | 5c 22 5c 22 0a 0a 46 6f |e, else |\"\"..Fo|
|00004c50| 72 20 65 78 61 6d 70 6c | 65 2c 20 75 73 65 0a 0a |r exampl|e, use..|
|00004c60| 20 20 20 20 20 20 20 20 | 28 65 71 75 61 6c 20 30 | |(equal 0|
|00004c70| 20 73 69 7a 65 29 0a 0a | 74 6f 20 6d 61 72 6b 20 | size)..|to mark |
|00004c80| 61 6c 6c 20 7a 65 72 6f | 20 6c 65 6e 67 74 68 20 |all zero| length |
|00004c90| 66 69 6c 65 73 2e 22 20 | 22 78 4d 61 72 6b 20 69 |files." |"xMark i|
|00004ca0| 66 20 28 6c 69 73 70 20 | 65 78 70 72 29 3a 20 5c |f (lisp |expr): \|
|00004cb0| 6e 50 22 5d 29 0a 28 62 | 79 74 65 2d 63 6f 64 65 |nP"]).(b|yte-code|
|00004cc0| 20 22 c0 c1 21 ab 85 c1 | c2 c3 5c 22 88 c4 c5 4d | "..!...|..\"...M|
|00004cd0| 88 c6 c7 4d 87 22 20 5b | 66 62 6f 75 6e 64 70 20 |...M." [|fboundp |
|00004ce0| 67 6d 68 69 73 74 2d 6d | 61 6b 65 2d 6d 61 67 69 |gmhist-m|ake-magi|
|00004cf0| 63 20 64 69 72 65 64 2d | 6d 61 72 6b 2d 73 65 78 |c dired-|mark-sex|
|00004d00| 70 20 65 76 61 6c 2d 65 | 78 70 72 65 73 73 69 6f |p eval-e|xpressio|
|00004d10| 6e 2d 68 69 73 74 6f 72 | 79 20 64 69 72 65 64 2d |n-histor|y dired-|
|00004d20| 70 61 72 73 65 2d 6c 73 | 20 23 5b 6e 69 6c 20 22 |parse-ls| #[nil "|
|00004d30| c0 20 85 a0 00 c1 c2 c3 | 1c 1d 1e 06 c7 79 88 c8 |. ......|.....y..|
|00004d40| 75 88 c9 0c 21 ab 98 c7 | 95 62 88 ca cb 94 cb 95 |u...!...|.b......|
|00004d50| 7b 21 16 0c ca c8 94 c8 | 95 7b 21 16 0d aa 86 c1 |{!......|.{!.....|
|00004d60| 16 0c c1 16 0d 60 0d 60 | 5c 5c 7b 16 0e 0d 75 88 |.....`.`|\\{...u.|
|00004d70| cf 70 21 16 10 60 cb 76 | 88 60 7b 16 11 d2 d3 21 |.p!..`.v|.`{....!|
|00004d80| 88 cb 94 62 88 d4 75 88 | ca 8a d5 cb 21 88 60 89 |...b..u.|....!.`.|
|00004d90| 16 06 29 60 7b 21 16 16 | 0e 06 62 88 d5 cb 21 88 |..)`{!..|..b...!.|
|00004da0| 8a cb 76 88 60 29 60 7b | 16 17 cb 94 c0 20 53 7b |..v.`)`{|..... S{|
|00004db0| 16 18 60 d9 da 21 ae 81 | 60 7b 16 1b c9 dc 21 ab |..`..!..|`{....!.|
|00004dc0| 8b dd 75 88 60 c1 7f 88 | 60 7b aa 81 de 16 1f 2b |..u.`...|`{.....+|
|00004dd0| da 87 22 20 5b 64 69 72 | 65 64 2d 6d 6f 76 65 2d |.." [dir|ed-move-|
|00004de0| 74 6f 2d 66 69 6c 65 6e | 61 6d 65 20 6e 69 6c 20 |to-filen|ame nil |
|00004df0| 31 30 20 22 5c 5c 73 20 | 2a 5c 5c 28 5b 30 2d 39 |10 "\\s |*\\([0-9|
|00004e00| 5d 2a 5c 5c 29 5c 5c 73 | 20 2a 5c 5c 28 5b 30 2d |]*\\)\\s| *\\([0-|
|00004e10| 39 5d 2a 5c 5c 29 20 3f | 22 20 64 69 72 65 64 2d |9]*\\) ?|" dired-|
|00004e20| 72 65 2d 69 6e 6f 64 65 | 2d 73 69 7a 65 20 6d 6f |re-inode|-size mo|
|00004e30| 64 65 2d 6c 65 6e 20 70 | 6f 73 20 30 20 32 20 6c |de-len p|os 0 2 l|
|00004e40| 6f 6f 6b 69 6e 67 2d 61 | 74 20 73 74 72 69 6e 67 |ooking-a|t string|
|00004e50| 2d 74 6f 2d 69 6e 74 20 | 31 20 69 6e 6f 64 65 20 |-to-int |1 inode |
|00004e60| 73 20 6d 6f 64 65 20 72 | 65 61 64 20 6e 6c 69 6e |s mode r|ead nlin|
|00004e70| 6b 20 75 69 64 20 72 65 | 2d 73 65 61 72 63 68 2d |k uid re|-search-|
|00004e80| 66 6f 72 77 61 72 64 20 | 22 5c 5c 28 4a 61 6e 5c |forward |"\\(Jan\|
|00004e90| 5c 7c 46 65 62 5c 5c 7c | 4d 61 72 5c 5c 7c 41 70 |\|Feb\\||Mar\\|Ap|
|00004ea0| 72 5c 5c 7c 4d 61 79 5c | 5c 7c 4a 75 6e 5c 5c 7c |r\\|May\|\|Jun\\||
|00004eb0| 4a 75 6c 5c 5c 7c 41 75 | 67 5c 5c 7c 53 65 70 5c |Jul\\|Au|g\\|Sep\|
|00004ec0| 5c 7c 4f 63 74 5c 5c 7c | 4e 6f 76 5c 5c 7c 44 65 |\|Oct\\||Nov\\|De|
|00004ed0| 63 5c 5c 29 22 20 2d 31 | 20 62 61 63 6b 77 61 72 |c\\)" -1| backwar|
|00004ee0| 64 2d 77 6f 72 64 20 73 | 69 7a 65 20 67 69 64 20 |d-word s|ize gid |
|00004ef0| 74 69 6d 65 20 64 69 72 | 65 64 2d 6d 6f 76 65 2d |time dir|ed-move-|
|00004f00| 74 6f 2d 65 6e 64 2d 6f | 66 2d 66 69 6c 65 6e 61 |to-end-o|f-filena|
|00004f10| 6d 65 20 74 20 6e 61 6d | 65 20 22 20 2d 3e 20 22 |me t nam|e " -> "|
|00004f20| 20 34 20 22 22 20 73 79 | 6d 5d 20 33 5d 20 64 69 | 4 "" sy|m] 3] di|
|00004f30| 72 65 64 2d 6d 61 72 6b | 2d 74 68 65 73 65 2d 66 |red-mark|-these-f|
|00004f40| 69 6c 65 73 20 23 5b 28 | 66 69 6c 65 2d 6c 69 73 |iles #[(|file-lis|
|00004f50| 74 20 66 72 6f 6d 29 20 | 22 c0 c1 5c 6e 5c 22 88 |t from) |"..\n\".|
|00004f60| 0b 47 c4 20 c5 89 1e 06 | 1e 07 1e 08 1e 09 0b ab |.G. ....|........|
|00004f70| aa ca 0b 40 0e 08 5c 22 | 16 07 0b 41 13 8a cb 0e |...@..\"|...A....|
|00004f80| 07 21 ab 86 cc cd 21 88 | aa 8f ce 0e 07 21 0e 06 |.!....!.|.....!..|
|00004f90| 42 16 06 cf d0 0e 07 5c | 22 88 29 aa 53 0e 06 ab |B......\|".).S...|
|00004fa0| 8f d1 c0 d2 0e 06 47 0e | 09 5c 6e 0e 06 25 21 aa |......G.|.\n..%!.|
|00004fb0| 8a c0 d3 0e 09 d4 0e 09 | 21 5c 6e 24 2c 87 22 20 |........|!\n$,." |
|00004fc0| 5b 6d 65 73 73 61 67 65 | 20 22 4d 61 72 6b 69 6e |[message| "Markin|
|00004fd0| 67 20 66 69 6c 65 73 20 | 25 73 2e 2e 2e 22 20 66 |g files |%s..." f|
|00004fe0| 72 6f 6d 20 66 69 6c 65 | 2d 6c 69 73 74 20 64 69 |rom file|-list di|
|00004ff0| 72 65 64 2d 63 75 72 72 | 65 6e 74 2d 64 69 72 65 |red-curr|ent-dire|
|00005000| 63 74 6f 72 79 20 6e 69 | 6c 20 66 61 69 6c 75 72 |ctory ni|l failur|
|00005010| 65 73 20 66 69 6c 65 20 | 63 75 72 2d 64 69 72 20 |es file |cur-dir |
|00005020| 74 6f 74 61 6c 20 64 69 | 72 65 64 2d 6d 61 6b 65 |total di|red-make|
|00005030| 2d 61 62 73 6f 6c 75 74 | 65 20 64 69 72 65 64 2d |-absolut|e dired-|
|00005040| 67 6f 74 6f 2d 66 69 6c | 65 20 64 69 72 65 64 2d |goto-fil|e dired-|
|00005050| 6d 61 72 6b 2d 66 69 6c | 65 20 31 20 64 69 72 65 |mark-fil|e 1 dire|
|00005060| 64 2d 6d 61 6b 65 2d 72 | 65 6c 61 74 69 76 65 20 |d-make-r|elative |
|00005070| 64 69 72 65 64 2d 6c 6f | 67 20 22 43 61 6e 6e 6f |dired-lo|g "Canno|
|00005080| 74 20 6d 61 72 6b 20 74 | 68 69 73 20 66 69 6c 65 |t mark t|his file|
|00005090| 20 28 6e 6f 74 20 66 6f | 75 6e 64 29 3a 20 25 73 | (not fo|und): %s|
|000050a0| 5c 6e 22 20 64 69 72 65 | 64 2d 6c 6f 67 2d 73 75 |\n" dire|d-log-su|
|000050b0| 6d 6d 61 72 79 20 22 46 | 61 69 6c 65 64 20 74 6f |mmary "F|ailed to|
|000050c0| 20 6d 61 72 6b 20 25 64 | 20 6f 66 20 25 64 20 66 | mark %d| of %d f|
|000050d0| 69 6c 65 73 20 25 73 20 | 25 73 22 20 22 4d 61 72 |iles %s |%s" "Mar|
|000050e0| 6b 65 64 20 25 64 20 66 | 69 6c 65 25 73 20 25 73 |ked %d f|ile%s %s|
|000050f0| 2e 22 20 64 69 72 65 64 | 2d 70 6c 75 72 61 6c 2d |." dired|-plural-|
|00005100| 73 5d 20 37 5d 5d 20 33 | 29 0a 28 66 73 65 74 20 |s] 7]] 3|).(fset |
|00005110| 27 64 69 72 65 64 2d 6d | 61 72 6b 2d 66 69 6c 65 |'dired-m|ark-file|
|00005120| 73 2d 66 72 6f 6d 2d 6f | 74 68 65 72 2d 64 69 72 |s-from-o|ther-dir|
|00005130| 65 64 2d 62 75 66 66 65 | 72 20 23 5b 28 62 75 66 |ed-buffe|r #[(buf|
|00005140| 29 20 22 c0 09 21 70 3d | ab 84 c2 c3 21 88 09 3b |) "..!p=|....!..;|
|00005150| ac 84 c4 09 21 11 8a 09 | 71 88 0d c6 3d ac 85 c2 |....!...|q...=...|
|00005160| c7 09 5c 22 88 c8 c9 21 | 29 1e 5c 6e cb 0e 5c 6e |..\"...!|).\n..\n|
|00005170| cc 09 50 5c 22 29 87 22 | 20 5b 67 65 74 2d 62 75 |..P\")."| [get-bu|
|00005180| 66 66 65 72 20 62 75 66 | 20 65 72 72 6f 72 20 22 |ffer buf| error "|
|00005190| 4f 74 68 65 72 20 64 69 | 72 65 64 20 62 75 66 66 |Other di|red buff|
|000051a0| 65 72 20 69 73 20 74 68 | 65 20 73 61 6d 65 22 20 |er is th|e same" |
|000051b0| 62 75 66 66 65 72 2d 6e | 61 6d 65 20 6d 61 6a 6f |buffer-n|ame majo|
|000051c0| 72 2d 6d 6f 64 65 20 64 | 69 72 65 64 2d 6d 6f 64 |r-mode d|ired-mod|
|000051d0| 65 20 22 25 73 20 69 73 | 20 6e 6f 74 20 61 20 64 |e "%s is| not a d|
|000051e0| 69 72 65 64 20 62 75 66 | 66 65 72 22 20 64 69 72 |ired buf|fer" dir|
|000051f0| 65 64 2d 6d 61 72 6b 2d | 67 65 74 2d 66 69 6c 65 |ed-mark-|get-file|
|00005200| 73 20 6e 6f 2d 64 69 72 | 20 6f 74 68 65 72 2d 66 |s no-dir| other-f|
|00005210| 69 6c 65 73 20 64 69 72 | 65 64 2d 6d 61 72 6b 2d |iles dir|ed-mark-|
|00005220| 74 68 65 73 65 2d 66 69 | 6c 65 73 20 22 66 72 6f |these-fi|les "fro|
|00005230| 6d 20 62 75 66 66 65 72 | 20 22 5d 20 34 20 22 5c |m buffer| "] 4 "\|
|00005240| 0a 4d 61 72 6b 20 66 69 | 6c 65 73 20 74 68 61 74 |.Mark fi|les that|
|00005250| 20 61 72 65 20 6d 61 72 | 6b 65 64 20 69 6e 20 74 | are mar|ked in t|
|00005260| 68 65 20 6f 74 68 65 72 | 20 44 69 72 65 64 20 62 |he other| Dired b|
|00005270| 75 66 66 65 72 2e 0a 49 | 2e 65 2c 20 6d 61 72 6b |uffer..I|.e, mark|
|00005280| 20 74 68 6f 73 65 20 66 | 69 6c 65 73 20 69 6e 20 | those f|iles in |
|00005290| 74 68 69 73 20 44 69 72 | 65 64 20 62 75 66 66 65 |this Dir|ed buffe|
|000052a0| 72 20 74 68 61 74 20 68 | 61 76 65 20 74 68 65 20 |r that h|ave the |
|000052b0| 73 61 6d 65 0a 6e 6f 6e | 2d 64 69 72 65 63 74 6f |same.non|-directo|
|000052c0| 72 79 20 70 61 72 74 20 | 61 73 20 74 68 65 20 6d |ry part |as the m|
|000052d0| 61 72 6b 65 64 20 66 69 | 6c 65 73 20 69 6e 20 74 |arked fi|les in t|
|000052e0| 68 65 20 44 69 72 65 64 | 20 62 75 66 66 65 72 20 |he Dired| buffer |
|000052f0| 69 6e 20 74 68 65 20 6f | 74 68 65 72 20 77 69 6e |in the o|ther win|
|00005300| 64 6f 77 2e 22 20 28 62 | 79 74 65 2d 63 6f 64 65 |dow." (b|yte-code|
|00005310| 20 22 c0 c1 20 21 43 87 | 22 20 5b 77 69 6e 64 6f | ".. !C.|" [windo|
|00005320| 77 2d 62 75 66 66 65 72 | 20 6e 65 78 74 2d 77 69 |w-buffer| next-wi|
|00005330| 6e 64 6f 77 5d 20 32 29 | 5d 29 0a 28 66 73 65 74 |ndow] 2)|]).(fset|
|00005340| 20 27 64 69 72 65 64 2d | 6d 61 72 6b 2d 66 69 6c | 'dired-|mark-fil|
|00005350| 65 73 2d 63 6f 6d 70 69 | 6c 61 74 69 6f 6e 2d 62 |es-compi|lation-b|
|00005360| 75 66 66 65 72 20 23 5b | 28 26 6f 70 74 69 6f 6e |uffer #[|(&option|
|00005370| 61 6c 20 72 65 67 65 78 | 70 20 62 75 66 29 20 22 |al regex|p buf) "|
|00005380| c0 89 19 1a 0b 47 c4 55 | ab 84 0d 13 aa 82 c6 11 |.....G.U|........|
|00005390| 0e 07 ac 83 c8 16 07 0e | 07 3b ac 86 c9 0e 07 21 |........|.;.....!|
|000053a0| 16 07 8a ca 0e 07 21 ae | 85 cb cc 0e 07 5c 22 71 |......!.|.....\"q|
|000053b0| 88 65 62 88 c0 89 1e 0d | 1e 0e cf 0b c0 c6 23 ab |.eb.....|......#.|
|000053c0| af 09 ab 88 d0 94 ae 86 | c4 94 aa 82 d0 94 09 ab |........|........|
|000053d0| 88 d0 95 ae 86 c4 95 aa | 82 d1 94 7b 16 0d 0e 0e |........|...{....|
|000053e0| 0e 0d 9a ac 55 0e 0d 5c | 6e 42 12 0e 0d 16 0e aa |....U..\|nB......|
|000053f0| 4a 2b d2 5c 6e d3 0e 07 | 50 5c 22 2a 87 22 20 5b |J+.\n...|P\"*." [|
|00005400| 6e 69 6c 20 75 73 65 72 | 2d 72 65 67 65 78 70 2d |nil user|-regexp-|
|00005410| 70 20 6f 74 68 65 72 2d | 66 69 6c 65 73 20 72 65 |p other-|files re|
|00005420| 67 65 78 70 20 30 20 63 | 6f 6d 70 69 6c 61 74 69 |gexp 0 c|ompilati|
|00005430| 6f 6e 2d 65 72 72 6f 72 | 2d 72 65 67 65 78 70 20 |on-error|-regexp |
|00005440| 74 20 62 75 66 20 22 2a | 63 6f 6d 70 69 6c 61 74 |t buf "*|compilat|
|00005450| 69 6f 6e 2a 22 20 62 75 | 66 66 65 72 2d 6e 61 6d |ion*" bu|ffer-nam|
|00005460| 65 20 67 65 74 2d 62 75 | 66 66 65 72 20 65 72 72 |e get-bu|ffer err|
|00005470| 6f 72 20 22 4e 6f 20 25 | 73 20 62 75 66 66 65 72 |or "No %|s buffer|
|00005480| 21 22 20 6e 65 77 2d 66 | 69 6c 65 20 66 69 6c 65 |!" new-f|ile file|
|00005490| 20 72 65 2d 73 65 61 72 | 63 68 2d 66 6f 72 77 61 | re-sear|ch-forwa|
|000054a0| 72 64 20 31 20 32 20 64 | 69 72 65 64 2d 6d 61 72 |rd 1 2 d|ired-mar|
|000054b0| 6b 2d 74 68 65 73 65 2d | 66 69 6c 65 73 20 22 66 |k-these-|files "f|
|000054c0| 72 6f 6d 20 62 75 66 66 | 65 72 20 22 5d 20 34 20 |rom buff|er "] 4 |
|000054d0| 22 5c 0a 4d 61 72 6b 20 | 74 68 65 20 66 69 6c 65 |"\.Mark |the file|
|000054e0| 73 20 6d 65 6e 74 69 6f | 6e 65 64 20 69 6e 20 74 |s mentio|ned in t|
|000054f0| 68 65 20 60 2a 63 6f 6d | 70 69 6c 61 74 69 6f 6e |he `*com|pilation|
|00005500| 2a 27 20 62 75 66 66 65 | 72 2e 0a 57 69 74 68 20 |*' buffe|r..With |
|00005510| 61 6e 20 61 72 67 2c 20 | 79 6f 75 20 6d 61 79 20 |an arg, |you may |
|00005520| 73 70 65 63 69 66 79 20 | 74 68 65 20 6f 74 68 65 |specify |the othe|
|00005530| 72 20 62 75 66 66 65 72 | 20 61 6e 64 20 79 6f 75 |r buffer| and you|
|00005540| 72 20 6f 77 6e 20 72 65 | 67 65 78 70 0a 69 6e 73 |r own re|gexp.ins|
|00005550| 74 65 61 64 20 6f 66 20 | 60 63 6f 6d 70 69 6c 61 |tead of |`compila|
|00005560| 74 69 6f 6e 2d 65 72 72 | 6f 72 2d 72 65 67 65 78 |tion-err|or-regex|
|00005570| 70 27 2e 0a 55 73 65 20 | 60 5e 2e 2b 24 27 20 28 |p'..Use |`^.+$' (|
|00005580| 74 68 65 20 64 65 66 61 | 75 6c 74 20 77 69 74 68 |the defa|ult with|
|00005590| 20 61 20 70 72 65 66 69 | 78 20 61 72 67 29 20 74 | a prefi|x arg) t|
|000055a0| 6f 20 6d 61 74 63 68 20 | 63 6f 6d 70 6c 65 74 65 |o match |complete|
|000055b0| 20 6c 69 6e 65 73 20 6f | 72 0a 61 6e 20 65 6d 70 | lines o|r.an emp|
|000055c0| 74 79 20 73 74 72 69 6e | 67 20 66 6f 72 20 60 63 |ty strin|g for `c|
|000055d0| 6f 6d 70 69 6c 61 74 69 | 6f 6e 2d 65 72 72 6f 72 |ompilati|on-error|
|000055e0| 2d 72 65 67 65 78 70 27 | 2e 0a 49 6e 20 63 6f 6e |-regexp'|..In con|
|000055f0| 6a 75 6e 63 74 69 6f 6e | 20 77 69 74 68 20 6e 61 |junction| with na|
|00005600| 72 72 6f 77 69 6e 67 20 | 74 68 65 20 6f 74 68 65 |rrowing |the othe|
|00005610| 72 20 62 75 66 66 65 72 | 20 79 6f 75 20 63 61 6e |r buffer| you can|
|00005620| 20 6d 61 72 6b 20 61 6e | 0a 61 72 62 69 74 72 61 | mark an|.arbitra|
|00005630| 72 79 20 6c 69 73 74 20 | 6f 66 20 66 69 6c 65 73 |ry list |of files|
|00005640| 2c 20 6f 6e 65 20 70 65 | 72 20 6c 69 6e 65 2c 20 |, one pe|r line, |
|00005650| 77 69 74 68 20 74 68 69 | 73 20 63 6f 6d 6d 61 6e |with thi|s comman|
|00005660| 64 2e 22 20 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |d." (byt|e-code "|
|00005670| 08 ad 9a c1 c2 c3 5c 22 | c4 c5 c6 c7 20 21 89 1e |......\"|.... !..|
|00005680| 08 70 3d ab 84 c9 20 aa | 82 0e 08 29 5c 22 44 87 |.p=... .|...)\"D.|
|00005690| 22 20 5b 63 75 72 72 65 | 6e 74 2d 70 72 65 66 69 |" [curre|nt-prefi|
|000056a0| 78 2d 61 72 67 20 72 65 | 61 64 2d 73 74 72 69 6e |x-arg re|ad-strin|
|000056b0| 67 20 22 55 73 65 20 63 | 6f 6d 70 69 6c 61 74 69 |g "Use c|ompilati|
|000056c0| 6f 6e 20 72 65 67 65 78 | 70 3a 20 22 20 22 5e 2e |on regex|p: " "^.|
|000056d0| 2b 24 22 20 72 65 61 64 | 2d 62 75 66 66 65 72 20 |+$" read|-buffer |
|000056e0| 22 55 73 65 20 62 75 66 | 66 65 72 3a 20 22 20 77 |"Use buf|fer: " w|
|000056f0| 69 6e 64 6f 77 2d 62 75 | 66 66 65 72 20 6e 65 78 |indow-bu|ffer nex|
|00005700| 74 2d 77 69 6e 64 6f 77 | 20 6e 65 78 74 2d 62 75 |t-window| next-bu|
|00005710| 66 66 65 72 20 6f 74 68 | 65 72 2d 62 75 66 66 65 |ffer oth|er-buffe|
|00005720| 72 5d 20 36 29 5d 29 0a | 28 64 65 66 76 61 72 20 |r] 6)]).|(defvar |
|00005730| 64 69 72 65 64 2d 6b 65 | 65 70 2d 6d 61 72 6b 65 |dired-ke|ep-marke|
|00005740| 72 2d 72 65 6c 73 79 6d | 6c 69 6e 6b 20 38 33 20 |r-relsym|link 83 |
|00005750| 22 5c 0a 53 65 65 20 76 | 61 72 69 61 62 6c 65 20 |"\.See v|ariable |
|00005760| 60 64 69 72 65 64 2d 6b | 65 65 70 2d 6d 61 72 6b |`dired-k|eep-mark|
|00005770| 65 72 2d 6d 6f 76 65 27 | 2e 22 29 0a 28 66 73 65 |er-move'|.").(fse|
|00005780| 74 20 27 64 69 72 65 64 | 2d 6d 61 6b 65 2d 73 79 |t 'dired|-make-sy|
|00005790| 6d 62 6f 6c 69 63 2d 6c | 69 6e 6b 20 23 5b 28 6e |mbolic-l|ink #[(n|
|000057a0| 61 6d 65 31 20 6e 61 6d | 65 32 20 26 6f 70 74 69 |ame1 nam|e2 &opti|
|000057b0| 6f 6e 61 6c 20 6f 6b 2d | 69 66 2d 61 6c 72 65 61 |onal ok-|if-alrea|
|000057c0| 64 79 2d 65 78 69 73 74 | 73 29 20 22 c0 09 21 11 |dy-exist|s) "..!.|
|000057d0| c2 09 21 1a c3 09 21 1b | 5c 6e ae 81 0b 1c 5c 6e |..!...!.|\n....\n|
|000057e0| ab 86 0b ac 83 c5 16 06 | 0e 06 ab 85 0e 06 a8 ab |........|........|
|000057f0| 97 0c ab 94 0e 06 a8 ab | 88 c7 c8 c9 09 5c 22 21 |........|.....\"!|
|00005800| ac 87 ca cb cc 09 42 5c | 22 88 cd 1e 0e 0c ab 84 |......B\|".......|
|00005810| cf 09 21 88 d0 d1 d2 d3 | 0e 14 09 25 89 16 0e ad |..!.....|...%....|
|00005820| 87 ca cb d2 0e 0e 42 5c | 22 2c 87 22 20 5b 65 78 |......B\|",." [ex|
|00005830| 70 61 6e 64 2d 66 69 6c | 65 2d 6e 61 6d 65 20 6e |pand-fil|e-name n|
|00005840| 61 6d 65 32 20 66 69 6c | 65 2d 73 79 6d 6c 69 6e |ame2 fil|e-symlin|
|00005850| 6b 2d 70 20 66 69 6c 65 | 2d 65 78 69 73 74 73 2d |k-p file|-exists-|
|00005860| 70 20 66 69 6c 65 2d 6f | 72 2d 73 79 6d 6c 69 6e |p file-o|r-symlin|
|00005870| 6b 2d 65 78 69 73 74 73 | 20 31 20 6f 6b 2d 69 66 |k-exists| 1 ok-if|
|00005880| 2d 61 6c 72 65 61 64 79 | 2d 65 78 69 73 74 73 20 |-already|-exists |
|00005890| 79 65 73 2d 6f 72 2d 6e | 6f 2d 70 20 66 6f 72 6d |yes-or-n|o-p form|
|000058a0| 61 74 20 22 46 69 6c 65 | 20 25 73 20 61 6c 72 65 |at "File| %s alre|
|000058b0| 61 64 79 20 65 78 69 73 | 74 73 3b 20 73 79 6d 6c |ady exis|ts; syml|
|000058c0| 69 6e 6b 20 61 6e 79 77 | 61 79 3f 20 22 20 73 69 |ink anyw|ay? " si|
|000058d0| 67 6e 61 6c 20 66 69 6c | 65 2d 65 72 72 6f 72 20 |gnal fil|e-error |
|000058e0| 22 46 69 6c 65 20 61 6c | 72 65 61 64 79 20 65 78 |"File al|ready ex|
|000058f0| 69 73 74 73 22 20 6e 69 | 6c 20 65 72 72 20 64 65 |ists" ni|l err de|
|00005900| 6c 65 74 65 2d 66 69 6c | 65 20 64 69 72 65 64 2d |lete-fil|e dired-|
|00005910| 63 68 65 63 6b 2d 70 72 | 6f 63 65 73 73 20 22 53 |check-pr|ocess "S|
|00005920| 79 6d 4c 69 6e 6b 22 20 | 22 6c 6e 22 20 22 2d 73 |ymLink" |"ln" "-s|
|00005930| 22 20 6e 61 6d 65 31 5d | 20 37 20 6e 69 6c 20 22 |" name1]| 7 nil "|
|00005940| 46 53 79 6d 6c 69 6e 6b | 20 74 6f 20 28 73 74 72 |FSymlink| to (str|
|00005950| 69 6e 67 29 3a 20 5c 6e | 46 4d 61 6b 65 20 73 79 |ing): \n|FMake sy|
|00005960| 6d 62 6f 6c 69 63 20 6c | 69 6e 6b 20 74 6f 20 60 |mbolic l|ink to `|
|00005970| 25 73 27 3a 20 5c 6e 70 | 22 5d 29 0a 28 66 73 65 |%s': \np|"]).(fse|
|00005980| 74 20 27 64 69 72 65 64 | 2d 6d 61 6b 65 2d 72 65 |t 'dired|-make-re|
|00005990| 6c 61 74 69 76 65 2d 73 | 79 6d 6c 69 6e 6b 20 23 |lative-s|ymlink #|
|000059a0| 5b 28 66 69 6c 65 31 20 | 66 69 6c 65 32 20 26 6f |[(file1 |file2 &o|
|000059b0| 70 74 69 6f 6e 61 6c 20 | 6f 6b 2d 69 66 2d 61 6c |ptional |ok-if-al|
|000059c0| 72 65 61 64 79 2d 65 78 | 69 73 74 73 29 20 22 c0 |ready-ex|ists) ".|
|000059d0| 89 89 89 c1 c0 1a 1b 1c | 1d 1e 06 1e 07 c8 0e 09 |........|........|
|000059e0| 21 16 09 c8 0e 5c 6e 21 | 16 5c 6e 0e 09 47 15 0e |!....\n!|.\n..G..|
|000059f0| 5c 6e 47 14 c0 1e 0b cc | cd 0e 09 0b 23 89 16 0b |\nG.....|....#...|
|00005a00| ab a4 0e 0b 54 89 16 0b | ab 9c 0e 0b 0d 0c 5e 57 |....T...|......^W|
|00005a10| ab 94 0e 09 c1 0e 0b 4f | 0e 5c 6e c1 0e 0b 4f 98 |.......O|.\n...O.|
|00005a20| ab 85 0e 0b 13 aa 51 0e | 5c 6e 16 06 0e 09 c1 0b |......Q.|\n......|
|00005a30| 4f 12 0e 09 0b c0 4f 16 | 07 29 5c 6e cd 98 ab 86 |O.....O.|.)\n....|
|00005a40| 0e 09 16 07 aa b9 0e 5c | 6e 0b c0 4f c1 89 1e 0e |.......\|n..O....|
|00005a50| 1e 0f 1e 10 cc cd 0e 10 | 0e 0f 23 89 16 0f ab 8c |........|..#.....|
|00005a60| 0e 0e 54 16 0e 0e 0f 54 | 16 0f aa 68 0e 0e c1 56 |..T....T|...h...V|
|00005a70| ab 8d 0e 0e 53 16 0e d1 | 0e 07 50 16 07 aa 6d 2b |....S...|..P...m+|
|00005a80| d2 d3 0e 07 21 0e 06 0e | 14 23 2e 06 87 22 20 5b |....!...|.#..." [|
|00005a90| 6e 69 6c 20 30 20 73 75 | 62 20 69 6e 64 65 78 20 |nil 0 su|b index |
|00005aa0| 6c 65 6e 32 20 6c 65 6e | 31 20 6e 61 6d 65 32 20 |len2 len|1 name2 |
|00005ab0| 6e 61 6d 65 31 20 65 78 | 70 61 6e 64 2d 66 69 6c |name1 ex|pand-fil|
|00005ac0| 65 2d 6e 61 6d 65 20 66 | 69 6c 65 31 20 66 69 6c |e-name f|ile1 fil|
|00005ad0| 65 32 20 6e 65 78 74 20 | 73 74 72 69 6e 67 2d 6d |e2 next |string-m|
|00005ae0| 61 74 63 68 20 22 2f 22 | 20 63 6f 75 6e 74 20 73 |atch "/"| count s|
|00005af0| 74 61 72 74 20 74 65 6d | 20 22 2e 2e 2f 22 20 64 |tart tem| "../" d|
|00005b00| 69 72 65 64 2d 6d 61 6b | 65 2d 73 79 6d 62 6f 6c |ired-mak|e-symbol|
|00005b10| 69 63 2d 6c 69 6e 6b 20 | 64 69 72 65 63 74 6f 72 |ic-link |director|
|00005b20| 79 2d 66 69 6c 65 2d 6e | 61 6d 65 20 6f 6b 2d 69 |y-file-n|ame ok-i|
|00005b30| 66 2d 61 6c 72 65 61 64 | 79 2d 65 78 69 73 74 73 |f-alread|y-exists|
|00005b40| 5d 20 36 20 22 5c 0a 54 | 68 72 65 65 20 61 72 67 |] 6 "\.T|hree arg|
|00005b50| 75 6d 65 6e 74 73 3a 20 | 46 49 4c 45 31 20 46 49 |uments: |FILE1 FI|
|00005b60| 4c 45 32 20 26 6f 70 74 | 69 6f 6e 61 6c 20 4f 4b |LE2 &opt|ional OK|
|00005b70| 2d 49 46 2d 41 4c 52 45 | 41 44 59 2d 45 58 49 53 |-IF-ALRE|ADY-EXIS|
|00005b80| 54 53 0a 4d 61 6b 65 20 | 61 20 73 79 6d 62 6f 6c |TS.Make |a symbol|
|00005b90| 69 63 20 6c 69 6e 6b 20 | 28 70 6f 69 6e 74 69 6e |ic link |(pointin|
|00005ba0| 67 20 74 6f 20 46 49 4c | 45 31 29 20 69 6e 20 46 |g to FIL|E1) in F|
|00005bb0| 49 4c 45 32 2e 0a 54 68 | 65 20 6c 69 6e 6b 20 69 |ILE2..Th|e link i|
|00005bc0| 73 20 72 65 6c 61 74 69 | 76 65 20 28 69 66 20 70 |s relati|ve (if p|
|00005bd0| 6f 73 73 69 62 6c 65 29 | 2c 20 66 6f 72 20 65 78 |ossible)|, for ex|
|00005be0| 61 6d 70 6c 65 0a 0a 20 | 20 20 20 5c 22 2f 76 6f |ample.. | \"/vo|
|00005bf0| 6c 2f 74 65 78 2f 62 69 | 6e 2f 66 6f 6f 5c 22 20 |l/tex/bi|n/foo\" |
|00005c00| 5c 22 2f 76 6f 6c 2f 6c | 6f 63 61 6c 2f 62 69 6e |\"/vol/l|ocal/bin|
|00005c10| 2f 66 6f 6f 5c 22 0a 0a | 72 65 73 75 6c 74 73 20 |/foo\"..|results |
|00005c20| 69 6e 0a 0a 20 20 20 20 | 5c 22 2e 2e 2f 2e 2e 2f |in.. |\"../../|
|00005c30| 74 65 78 2f 62 69 6e 2f | 66 6f 6f 5c 22 20 5c 22 |tex/bin/|foo\" \"|
|00005c40| 2f 76 6f 6c 2f 6c 6f 63 | 61 6c 2f 62 69 6e 2f 66 |/vol/loc|al/bin/f|
|00005c50| 6f 6f 5c 22 0a 22 20 22 | 46 52 65 6c 53 79 6d 4c |oo\"." "|FRelSymL|
|00005c60| 69 6e 6b 3a 20 5c 6e 46 | 52 65 6c 53 79 6d 4c 69 |ink: \nF|RelSymLi|
|00005c70| 6e 6b 20 25 73 3a 20 5c | 6e 70 22 5d 29 0a 28 66 |nk %s: \|np"]).(f|
|00005c80| 73 65 74 20 27 64 69 72 | 65 64 2d 64 6f 2d 72 65 |set 'dir|ed-do-re|
|00005c90| 6c 73 79 6d 6c 69 6e 6b | 20 23 5b 28 26 6f 70 74 |lsymlink| #[(&opt|
|00005ca0| 69 6f 6e 61 6c 20 61 72 | 67 29 20 22 c0 c1 c2 c3 |ional ar|g) "....|
|00005cb0| 0c 0d 25 87 22 20 5b 64 | 69 72 65 64 2d 64 6f 2d |..%." [d|ired-do-|
|00005cc0| 63 72 65 61 74 65 2d 66 | 69 6c 65 73 20 72 65 6c |create-f|iles rel|
|00005cd0| 73 79 6d 6c 69 6e 6b 20 | 64 69 72 65 64 2d 6d 61 |symlink |dired-ma|
|00005ce0| 6b 65 2d 72 65 6c 61 74 | 69 76 65 2d 73 79 6d 6c |ke-relat|ive-syml|
|00005cf0| 69 6e 6b 20 22 52 65 6c | 53 79 6d 4c 69 6e 6b 22 |ink "Rel|SymLink"|
|00005d00| 20 61 72 67 20 64 69 72 | 65 64 2d 6b 65 65 70 2d | arg dir|ed-keep-|
|00005d10| 6d 61 72 6b 65 72 2d 72 | 65 6c 73 79 6d 6c 69 6e |marker-r|elsymlin|
|00005d20| 6b 5d 20 36 20 22 5c 0a | 53 79 6d 6c 69 6e 6b 20 |k] 6 "\.|Symlink |
|00005d30| 61 6c 6c 20 6d 61 72 6b | 65 64 20 28 6f 72 20 6e |all mark|ed (or n|
|00005d40| 65 78 74 20 41 52 47 29 | 20 66 69 6c 65 73 20 69 |ext ARG)| files i|
|00005d50| 6e 74 6f 20 61 20 64 69 | 72 65 63 74 6f 72 79 2c |nto a di|rectory,|
|00005d60| 0a 6f 72 20 6d 61 6b 65 | 20 61 20 73 79 6d 62 6f |.or make| a symbo|
|00005d70| 6c 69 63 20 6c 69 6e 6b | 20 74 6f 20 74 68 65 20 |lic link| to the |
|00005d80| 63 75 72 72 65 6e 74 20 | 66 69 6c 65 2e 0a 54 68 |current |file..Th|
|00005d90| 69 73 20 63 72 65 61 74 | 65 73 20 72 65 6c 61 74 |is creat|es relat|
|00005da0| 69 76 65 20 73 79 6d 62 | 6f 6c 69 63 20 6c 69 6e |ive symb|olic lin|
|00005db0| 6b 73 20 6c 69 6b 65 0a | 0a 20 20 20 20 66 6f 6f |ks like.|. foo|
|00005dc0| 20 2d 3e 20 2e 2e 2f 62 | 61 72 2f 66 6f 6f 0a 0a | -> ../b|ar/foo..|
|00005dd0| 6e 6f 74 20 61 62 73 6f | 6c 75 74 65 20 6f 6e 65 |not abso|lute one|
|00005de0| 73 20 6c 69 6b 65 0a 0a | 20 20 20 20 66 6f 6f 20 |s like..| foo |
|00005df0| 2d 3e 20 2f 75 67 6c 79 | 2f 70 61 74 68 2f 74 68 |-> /ugly|/path/th|
|00005e00| 61 74 2f 6d 61 79 2f 63 | 68 61 6e 67 65 2f 61 6e |at/may/c|hange/an|
|00005e10| 79 2f 64 61 79 2f 62 61 | 72 2f 66 6f 6f 22 20 22 |y/day/ba|r/foo" "|
|00005e20| 50 22 5d 29 0a 28 66 73 | 65 74 20 27 64 69 72 65 |P"]).(fs|et 'dire|
|00005e30| 64 2d 64 6f 2d 72 65 6c | 73 79 6d 6c 69 6e 6b 2d |d-do-rel|symlink-|
|00005e40| 72 65 67 65 78 70 20 23 | 5b 28 72 65 67 65 78 70 |regexp #|[(regexp|
|00005e50| 20 6e 65 77 6e 61 6d 65 | 20 26 6f 70 74 69 6f 6e | newname| &option|
|00005e60| 61 6c 20 61 72 67 20 77 | 68 6f 6c 65 2d 70 61 74 |al arg w|hole-pat|
|00005e70| 68 29 20 22 c0 c1 c2 0b | 0c 0d 0e 06 0e 07 26 07 |h) "....|......&.|
|00005e80| 87 22 20 5b 64 69 72 65 | 64 2d 64 6f 2d 63 72 65 |." [dire|d-do-cre|
|00005e90| 61 74 65 2d 66 69 6c 65 | 73 2d 72 65 67 65 78 70 |ate-file|s-regexp|
|00005ea0| 20 64 69 72 65 64 2d 6d | 61 6b 65 2d 72 65 6c 61 | dired-m|ake-rela|
|00005eb0| 74 69 76 65 2d 73 79 6d | 6c 69 6e 6b 20 22 52 65 |tive-sym|link "Re|
|00005ec0| 6c 53 79 6d 4c 69 6e 6b | 22 20 61 72 67 20 72 65 |lSymLink|" arg re|
|00005ed0| 67 65 78 70 20 6e 65 77 | 6e 61 6d 65 20 77 68 6f |gexp new|name who|
|00005ee0| 6c 65 2d 70 61 74 68 20 | 64 69 72 65 64 2d 6b 65 |le-path |dired-ke|
|00005ef0| 65 70 2d 6d 61 72 6b 65 | 72 2d 72 65 6c 73 79 6d |ep-marke|r-relsym|
|00005f00| 6c 69 6e 6b 5d 20 38 20 | 22 5c 0a 52 65 6c 53 79 |link] 8 |"\.RelSy|
|00005f10| 6d 6c 69 6e 6b 20 61 6c | 6c 20 6d 61 72 6b 65 64 |mlink al|l marked|
|00005f20| 20 66 69 6c 65 73 20 63 | 6f 6e 74 61 69 6e 69 6e | files c|ontainin|
|00005f30| 67 20 52 45 47 45 58 50 | 20 74 6f 20 4e 45 57 4e |g REGEXP| to NEWN|
|00005f40| 41 4d 45 2e 0a 53 65 65 | 20 66 75 6e 63 74 69 6f |AME..See| functio|
|00005f50| 6e 73 20 60 64 69 72 65 | 64 2d 72 65 6e 61 6d 65 |ns `dire|d-rename|
|00005f60| 2d 72 65 67 65 78 70 27 | 20 61 6e 64 20 60 64 69 |-regexp'| and `di|
|00005f70| 72 65 64 2d 64 6f 2d 72 | 65 6c 73 79 6d 6c 69 6e |red-do-r|elsymlin|
|00005f80| 6b 27 0a 20 20 66 6f 72 | 20 6d 6f 72 65 20 69 6e |k'. for| more in|
|00005f90| 66 6f 2e 20 57 69 74 68 | 20 6f 70 74 69 6f 6e 61 |fo. With| optiona|
|00005fa0| 6c 20 70 72 65 66 69 78 | 20 41 52 47 2c 20 77 69 |l prefix| ARG, wi|
|00005fb0| 6c 6c 20 6f 70 65 72 61 | 74 65 20 6f 6e 20 41 52 |ll opera|te on AR|
|00005fc0| 47 20 66 69 6c 65 73 20 | 66 6f 6c 6c 6f 77 69 6e |G files |followin|
|00005fd0| 67 0a 70 6f 69 6e 74 20 | 69 66 20 6e 6f 20 66 69 |g.point |if no fi|
|00005fe0| 6c 65 73 20 61 72 65 20 | 6d 61 72 6b 65 64 2e 22 |les are |marked."|
|00005ff0| 20 28 64 69 72 65 64 2d | 6d 61 72 6b 2d 72 65 61 | (dired-|mark-rea|
|00006000| 64 2d 72 65 67 65 78 70 | 20 22 52 65 6c 53 79 6d |d-regexp| "RelSym|
|00006010| 4c 69 6e 6b 22 29 5d 29 | 0a 28 66 73 65 74 20 27 |Link")])|.(fset '|
|00006020| 76 69 72 74 75 61 6c 2d | 64 69 72 65 64 20 27 64 |virtual-|dired 'd|
|00006030| 69 72 65 64 2d 76 69 72 | 74 75 61 6c 29 0a 28 66 |ired-vir|tual).(f|
|00006040| 73 65 74 20 27 64 69 72 | 65 64 2d 76 69 72 74 75 |set 'dir|ed-virtu|
|00006050| 61 6c 20 23 5b 28 64 69 | 72 6e 61 6d 65 20 26 6f |al #[(di|rname &o|
|00006060| 70 74 69 6f 6e 61 6c 20 | 73 77 69 74 63 68 65 73 |ptional |switches|
|00006070| 29 20 22 65 62 88 c0 c1 | 21 ac 86 c2 65 64 c3 23 |) "eb...|!...ed.#|
|00006080| 88 0c ac 82 0d 14 c6 c7 | 0c 21 21 89 14 15 8a 65 |........|.!!....e|
|00006090| 62 88 c8 79 88 c0 c9 21 | ad 87 ca 95 cb 7f 88 60 |b..y...!|.......`|
|000060a0| 7b 29 89 1e 0c ab 86 c6 | 0e 0c 0d 5c 22 14 29 65 |{)......|...\".)e|
|000060b0| 62 88 c0 0e 0d 21 ac 84 | ce 0d 21 88 cf 0c 0e 10 |b....!..|..!.....|
|000060c0| ae 82 0e 11 5c 22 88 d2 | 16 13 d4 16 15 d6 d7 21 |....\"..|.......!|
|000060d0| cb 4c 88 d8 20 88 65 62 | 88 d9 0c 21 87 22 20 5b |.L.. .eb|...!." [|
|000060e0| 6c 6f 6f 6b 69 6e 67 2d | 61 74 20 22 20 20 22 20 |looking-|at " " |
|000060f0| 69 6e 64 65 6e 74 2d 72 | 65 67 69 6f 6e 20 32 20 |indent-r|egion 2 |
|00006100| 64 69 72 6e 61 6d 65 20 | 64 65 66 61 75 6c 74 2d |dirname |default-|
|00006110| 64 69 72 65 63 74 6f 72 | 79 20 65 78 70 61 6e 64 |director|y expand|
|00006120| 2d 66 69 6c 65 2d 6e 61 | 6d 65 20 66 69 6c 65 2d |-file-na|me file-|
|00006130| 6e 61 6d 65 2d 61 73 2d | 64 69 72 65 63 74 6f 72 |name-as-|director|
|00006140| 79 20 31 20 22 5e 20 20 | 77 69 6c 64 63 61 72 64 |y 1 "^ |wildcard|
|00006150| 20 22 20 30 20 6e 69 6c | 20 77 69 6c 64 63 61 72 | " 0 nil| wildcar|
|00006160| 64 20 64 69 72 65 64 2d | 73 75 62 64 69 72 2d 72 |d dired-|subdir-r|
|00006170| 65 67 65 78 70 20 64 69 | 72 65 64 2d 69 6e 73 65 |egexp di|red-inse|
|00006180| 72 74 2d 68 65 61 64 65 | 72 6c 69 6e 65 20 64 69 |rt-heade|rline di|
|00006190| 72 65 64 2d 6d 6f 64 65 | 20 73 77 69 74 63 68 65 |red-mode| switche|
|000061a0| 73 20 64 69 72 65 64 2d | 6c 69 73 74 69 6e 67 2d |s dired-|listing-|
|000061b0| 73 77 69 74 63 68 65 73 | 20 22 56 69 72 74 75 61 |switches| "Virtua|
|000061c0| 6c 20 44 69 72 65 64 22 | 20 6d 6f 64 65 2d 6e 61 |l Dired"| mode-na|
|000061d0| 6d 65 20 64 69 72 65 64 | 2d 76 69 72 74 75 61 6c |me dired|-virtual|
|000061e0| 2d 72 65 76 65 72 74 20 | 72 65 76 65 72 74 2d 62 |-revert |revert-b|
|000061f0| 75 66 66 65 72 2d 66 75 | 6e 63 74 69 6f 6e 20 6d |uffer-fu|nction m|
|00006200| 61 6b 65 2d 6c 6f 63 61 | 6c 2d 76 61 72 69 61 62 |ake-loca|l-variab|
|00006210| 6c 65 20 64 69 72 65 64 | 2d 73 75 62 64 69 72 2d |le dired|-subdir-|
|00006220| 61 6c 69 73 74 20 64 69 | 72 65 64 2d 62 75 69 6c |alist di|red-buil|
|00006230| 64 2d 73 75 62 64 69 72 | 2d 61 6c 69 73 74 20 64 |d-subdir|-alist d|
|00006240| 69 72 65 64 2d 69 6e 69 | 74 69 61 6c 2d 70 6f 73 |ired-ini|tial-pos|
|00006250| 69 74 69 6f 6e 5d 20 35 | 20 22 5c 0a 50 75 74 20 |ition] 5| "\.Put |
|00006260| 74 68 69 73 20 62 75 66 | 66 65 72 20 69 6e 74 6f |this buf|fer into|
|00006270| 20 56 69 72 74 75 61 6c | 20 44 69 72 65 64 20 6d | Virtual| Dired m|
|00006280| 6f 64 65 2e 0a 0a 49 6e | 20 56 69 72 74 75 61 6c |ode...In| Virtual|
|00006290| 20 44 69 72 65 64 20 6d | 6f 64 65 2c 20 61 6c 6c | Dired m|ode, all|
|000062a0| 20 63 6f 6d 6d 61 6e 64 | 73 20 74 68 61 74 20 64 | command|s that d|
|000062b0| 6f 20 6e 6f 74 20 61 63 | 74 75 61 6c 6c 79 20 63 |o not ac|tually c|
|000062c0| 6f 6e 73 75 6c 74 20 74 | 68 65 0a 66 69 6c 65 73 |onsult t|he.files|
|000062d0| 79 73 74 65 6d 20 77 69 | 6c 6c 20 77 6f 72 6b 2e |ystem wi|ll work.|
|000062e0| 0a 0a 54 68 69 73 20 69 | 73 20 75 73 65 66 75 6c |..This i|s useful|
|000062f0| 20 69 66 20 79 6f 75 20 | 77 61 6e 74 20 74 6f 20 | if you |want to |
|00006300| 70 65 72 75 73 65 20 61 | 6e 64 20 6d 6f 76 65 20 |peruse a|nd move |
|00006310| 61 72 6f 75 6e 64 20 69 | 6e 20 61 6e 20 6c 73 20 |around i|n an ls |
|00006320| 2d 6c 52 0a 6f 75 74 70 | 75 74 20 66 69 6c 65 2c |-lR.outp|ut file,|
|00006330| 20 66 6f 72 20 65 78 61 | 6d 70 6c 65 20 6f 6e 65 | for exa|mple one|
|00006340| 20 79 6f 75 20 67 6f 74 | 20 66 72 6f 6d 20 61 6e | you got| from an|
|00006350| 20 66 74 70 20 73 65 72 | 76 65 72 2e 20 20 57 69 | ftp ser|ver. Wi|
|00006360| 74 68 0a 61 6e 67 65 2d | 66 74 70 2c 20 79 6f 75 |th.ange-|ftp, you|
|00006370| 20 63 61 6e 20 65 76 65 | 6e 20 64 69 72 65 64 20 | can eve|n dired |
|00006380| 61 20 64 69 72 65 63 74 | 6f 72 79 20 63 6f 6e 74 |a direct|ory cont|
|00006390| 61 69 6e 69 6e 67 20 61 | 6e 20 6c 73 2d 6c 52 20 |aining a|n ls-lR |
|000063a0| 66 69 6c 65 2c 0a 76 69 | 73 69 74 20 74 68 61 74 |file,.vi|sit that|
|000063b0| 20 66 69 6c 65 20 61 6e | 64 20 74 75 72 6e 20 6f | file an|d turn o|
|000063c0| 6e 20 76 69 72 74 75 61 | 6c 20 64 69 72 65 64 20 |n virtua|l dired |
|000063d0| 6d 6f 64 65 2e 20 20 42 | 75 74 20 64 6f 6e 27 74 |mode. B|ut don't|
|000063e0| 20 74 72 79 20 74 6f 20 | 73 61 76 65 0a 74 68 69 | try to |save.thi|
|000063f0| 73 20 66 69 6c 65 2c 20 | 61 73 20 64 69 72 65 64 |s file, |as dired|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.
